Trả về Integer một kiểu con của biến số.
Cú pháp
VarType(varname)
Đối số bắt varname buộc là một tham đối Variant chứa bất kỳ biến nào ngoại trừ kiểu do người dùng xác định.
Giá trị trả về
| Liên tục | Value | Mô tả |
|---|---|---|
vbEmpty |
0 | Trống (chưa 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 |
vbCurrency |
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 |
Variant (chỉ được sử 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 Visual Basic for Applications (VBA). Bạn có thể sử dụng tên ở bất kỳ đâu trong mã thay vì các giá trị thực tế.
Chú thích
Hàm VarType không bao giờ tự trả về giá trị vbArray cho mình. Nó luôn luôn thêm giá trị đó vào một giá trị khác để biểu thị một mảng của một kiểu cụ thể.
Hằng vbVariant số chỉ được trả về với vbArray để cho biết đối số là VarType một mảng giá Variant trị. Ví dụ: giá trị được trả về cho một mảng các số nguyên là vbInteger + vbArray, hoặc 8194.
Nếu một đối tượng có thuộc tính mặc định, VarType(object) trả về loại 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ử VarType dụng hàm để xác định loại 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.