主题：列集合问题

学生姓名或户籍省是空时，不打开窗口1，或者打开窗口1 ，请教代码错在哪？谢谢

Dim kjmc() As String = "学生姓名,户籍省".Split(",")
For i As Integer = 0 To kjmc.Length - 1
    If e.Form.Controls(kjmc(i)).text = Nothing Then
        MessageBox.Show("【"& kjmc(i)&"】不能为空,请检查")
        e.Form.Controls(kjmc(i)).Select
        Return
    Else
        Forms("窗口1").Open()
    End If
Next

 

此主题相关图片如下：qq截图20170317120628.png

Dim kjmc() As String = "学生姓名,户籍省".Split(",")
For i As Integer = 0 To kjmc.Length - 1
    If e.Form.Controls(kjmc(i)).text = Nothing Then
        MessageBox.Show("【"& kjmc(i)&"】不能为空,请检查")
        e.Form.Controls(kjmc(i)).Select
        Return
    End If
Next

Forms("窗口1").Open()

谢谢