vb中怎样判断控件是一个控件还是一个控件数组的元素

来源：百度知道 编辑：UC知道 时间：2024/06/07 08:19:01
情况一：一个窗体上有三个TextBox控件，分别是Text1(0)，Text1(1)，Text1(2)。
情况二：一个窗体上有一个TextBox控件，就是Text1。
那么当知道Text1这个名称时，怎么才能知道Text1是一个控件数组的名称（情况一）还是一个控件的名称（情况二）？

If VarType(Text1) = vbObject Then
MsgBox "Text1是一个控件数组的名称"
Else
MsgBox "Text1是一个控件的名称"
End If

' VarType(Text1) = vbObject 也可改为 TypeName(Text1) = "Object" 或 Not TypeOf Text1 Is TextBox

'Index可以判断是哪一个按钮！ 它是控件属性，你可以 在属性里查的！
'比如：

Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0
MsgBox "按钮1"
Case 1
MsgBox "按钮2"
End Select
End Sub