Q:如何用VBA判断变量类型?
A:ALT+F11→插入模块→在新建模块中输入如下代码
代码
- Sub aa()
- Dim A, B, C, D, E, F, G, H, I, arr
- '变量初始化
- A = True
- B = 1
- C = 10 ^ 5
- D = 1234567890
- Set E = Sheets(1)
- F = #1/13/2009#
- Set G = Nothing
- arr = Array("A", "B", "C", "D", "E", "F", "G", "H", "I")
- '通过msgbox语句将结果显示出来
- MsgBox "A变量的类型为" & TypeName(A) & Chr(10) & _
- "B变量的类型为" & TypeName(B) & Chr(10) & _
- "C变量的类型为" & TypeName(C) & Chr(10) & _
- "D变量的类型为" & TypeName(D) & Chr(10) & _
- "E变量的类型为" & TypeName(E) & Chr(10) & _
- "F变量的类型为" & TypeName(F) & Chr(10) & _
- "G变量的类型为" & TypeName(G) & Chr(10) & _
- "arr变量的类型为" & TypeName(arr)
- End Sub
运行以上代码,即可在弹出的对话框中看到各变量的类型。