Question

我试图验证我的输入。每个文本框输入都放入一个数组strExamAnswer（）。当我的用户输入A，B，C或D时，我需要验证它们是否输入了可接受的输入。我的验证是正确的，但我希望在验证捕获错误输入后，不正确的文本框获得焦点。如何使用检查数组中每个输入的循环来关注所述文本框？

Private Sub Validatation(ByVal intIndex As Integer)
    Dim strA As String = "A"
    Dim strB As String = "B"
    Dim strC As String = "C"
    Dim strD As String = "D"


    For i = 0 To 19
        If strExamAnswer(i) = strA Then
            blnOk = True
        ElseIf strExamAnswer(i) = strB Then
            blnOk = True
        ElseIf strExamAnswer(i) = strC Then
            blnOk = True
        ElseIf strExamAnswer(i) = strD Then
            blnOk = True
        Else
            MessageBox.Show("Please enter A, B, C, D for Answer " & strQuestion(i))
            blnOk = False
            Exit Sub
        End If
    Next

    blnOk = True

End Sub

因此，当这段代码解决其中一个问题时，如何让它专注于数组中的特定文本框，它是无效的？有没有办法在使用数组的循环中执行此操作。我宁愿保持循环来限制代码量。我可以在一个案例中设置我而不是。

Answer 1

假设数组名为txtInput且与strExamAnswer具有相同的尺寸。

txtInput(i).Focus()

将焦点设置在数组中的文本框上

1 个答案: