如何判断控件数组中的某个控件对象不存在？请各位帮忙解答一下

Question

我在界面上定义了一组名为text1的控件，index值为1至10，
但index值为5的是不存在的，因为它是以combox控件显示的，
当我用循环语句将text框中的文本和combox框中的文本存入数据库时，
我应该怎么操作呢？怎么判断text1(5)是不存在的对象呢？

Answer 1

Private Sub Command1_Click()
    Dim obj As Object
    For Each obj In Me
        If TypeName(obj) = "TextBox" Then
            Debug.Print obj.Index '换成你的语句
        End If
    Next
End Sub

Answer 2

Private Sub Command1_Click()
    For i=1 to 10
        If (text1(i) Is Nothing) Then
            Debug.Print i
        End If
    Next
End Sub

Answer 3

比较简单有效了。
Private Sub Command1_Click()
    For i=1 to 10
        If (text1(i) not Is Nothing) Then
            Debug.Print i
        End If
    Next
End Sub