Trả về một giá trị kiểu Dài thể hiện mã màu RGB tương ứng với số màu đã xác định.
Cú pháp
QBColor ( màu )
Màu bắt buộctham đối là một số nguyên trong phạm vi 0–15.
Cài đặt
Đối số màu có các cài đặt này:
Number |
Màu |
Number |
Màu |
0 |
Đen |
8 |
Xám |
1 |
Lam |
9 |
Xanh nhạt |
2 |
Lục |
10 |
Xanh lá cây nhạt |
3 |
Cyan |
11 |
Lục lam nhạt |
4 |
Đỏ |
12 |
Đỏ Nhạt |
5 |
Magenta |
13 |
Hồng đỏ nhạt |
6 |
Vàng |
14 |
Màu vàng nhạt |
7 |
Trắng |
15 |
Trắng Sáng |
Chú thích
Đối số màu tượng trưng cho các giá trị màu được các phiên bản Trước của Cơ bản sử dụng (chẳng hạn như Microsoft Visual Basic cho MS-DOS và Trình biên soạn Cơ bản). Bắt đầu với byte ít có ý nghĩa nhất, giá trị trả về xác định các giá trị đỏ, lục và lam được dùng để đặt màu thích hợp trong hệ thống RGB mà Visual Basic for Applications sử dụng.
Ví dụ
Lưu ý: Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.
Ví dụ này sử dụng hàm QBColor để thay đổi thuộc tính BackColor của biểu mẫu được truyền vào dưới dạng MyForm thành màu được chỉ ColorCode. QBColor chấp nhận các giá trị số nguyên từ 0 đến 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form) MyForm.BackColor = QBColor(ColorCode) End Sub