Bir değişkenin alt türünü gösteren bir Tamsayı döndürür.
Söz dizimi
VarType(varname)
Gerekli varnamebağımsız değişkeni, kullanıcı tanımlı türde bir değişken dışında herhangi bir değişkeni içeren bir Değişkendir.
Dönüş Değerleri
| Sabit | Değer | Açıklama |
|---|---|---|
| vbEmpty | 0 | Boş (başlatılmamış) |
| vbNull | 1 | Null (geçerli veri yok) |
| vbInteger | 2 | Tamsayı |
| vbLong | 3 | Uzun tamsayı |
| vbSingle | 4 | Tek duyarlıklı kayan nokta numarası |
| vbDouble | 5 | Çift duyarlıklı kayan noktalı sayı |
| vbCurrency | 6 | Para birimi değeri |
| vbDate | 7 | Tarih değeri |
| vbString | 8 | Dize |
| vbObject | 9 | Nesne |
| vbError | 10 | Hata değeri |
| vbBoolean | 11 | Boole değeri |
| vbVariant | 12 | Değişken (yalnızca değişken dizileriyle kullanılır) |
| vbDataObject | 13 | Veri erişim nesnesi |
| vbDecimal | 14 | Ondalık değer |
| vbByte | 17 | Bayt değeri |
| vbUserDefinedType | 36 | Kullanıcı tanımlı türler içeren varyantlar |
| vbArray | 8192 | Dizi |
Not
Bu sabitler Visual Basic for Applications tarafından belirtilir. Adlar, kodunuzda gerçek değerler yerine herhangi bir yerde kullanılabilir.
Açıklamalar
VarType işlevi hiçbir zaman vbArray değerini tek başına döndürmez. Belirli bir tür dizisini belirtmek için her zaman başka bir değere eklenir. vbVariant sabiti yalnızca VarType işlevinin bağımsız değişkeninin Variant türünde bir dizi olduğunu belirtmek için vbArray ile birlikte döndürülür. Örneğin, bir tamsayı dizisi için döndürülen değer vbInteger + vbArray veya 8194 olarak hesaplanır. Bir nesnenin varsayılan özelliği varsa , VarType(nesne) nesnenin varsayılan özelliğinin türünü döndürür.
Örnek
Not
Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.
Bu örnekte değişkenin alt türünü belirlemek için VarType işlevi kullanılır.
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.