Trả về một Số nguyên biểu thị kiểu con của một số biến số.
Cú pháp
VarType ( tên_biến )
Tên_ biến_biến bắttham đối là một Biến_thể chứa bất kỳ biến nào ngoại trừ một biến của một kiểu người dùng xác định.
Giá trị Trả về
|
Hằng số |
Giá trị |
Mô tả |
|
vbEmpty |
0 |
Trống (đã tái khởi tạo) |
|
vbNull |
1 |
Null (không có dữ liệu hợp lệ) |
|
vbInteger |
2 |
Số nguyên |
|
vbLong |
3 |
Số nguyên dài |
|
vbSingle |
4 |
Số dấu động chính xác một lần |
|
vbDouble |
5 |
Số dấu động chính xác kép |
|
vb Tiền tệ |
6 |
Giá trị tiền tệ |
|
vbDate |
7 |
Giá trị ngày |
|
vbString |
8 |
Chuỗi |
|
vbObject |
9 |
Object |
|
vbError |
10 |
Giá trị lỗi |
|
vbBoolean |
11 |
Giá trị Boolean |
|
vbVariant |
12 |
Biến _thể (chỉ được dùng với mảng biến thể) |
|
vbDataObject |
13 |
Đối tượng truy nhập dữ liệu |
|
vbDecimal |
14 |
Giá trị thập phân |
|
vbByte |
17 |
Giá trị byte |
|
vbUserDefinedType |
36 |
Biến thể chứa kiểu do người dùng xác định |
|
vbArray |
8192 |
Array |
Lưu ý: Các hằng số này được xác định bởi Visual Basic for Applications. Tên có thể được sử dụng ở bất cứ đâu trong mã của bạn thay cho các giá trị thực tế.
Chú thích
Hàm VarType không bao giờ tự trả về giá trị cho vbArray . Nó luôn được thêm vào một số giá trị khác để biểu thị một mảng của một kiểu cụ thể. Hằng số vbVariant chỉ được trả về kết hợp với vbArray để cho biết tham đối của hàm VarType là một mảng gồm kiểu Biến_thể. Ví dụ: giá trị trả về cho một mảng các số nguyên được tính toán là vbInteger + vbArray hoặc 8194. Nếu một đối tượng có thuộc tính thuộc tính định, thì VarType(object) trả về kiểu thuộc tính mặc định của đối tượ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 VarType để xác định kiểu con của biến số.
Dim IntVar, StrVar, DateVar, MyCheck
' Initialize variables.
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
MyCheck = VarType(IntVar) ' Returns 2.
MyCheck = VarType(DateVar) ' Returns 7.
MyCheck = VarType(StrVar) ' Returns 8.
