Question

我正在制作一个程序，在textbox输入我的名字，如果正确，标签文字从“名字”变为“姓氏”，按钮文字从“检查到”更改“。
如果我在textbox中输入了不是我的名字的答案，那么标签应该改为”错误的重新输入“。我有第一部分放入我的名字正确：

If TxtBox.Text = "justin" Then
        Lbl.Text = "Last Name"
        Btn.Text = "Enter"
    ElseIf TxtBox.Text = "Justin" Then
        Lbl.Text = "Last Name"
        Btn.Text = "Enter"
    End If

但我无法弄清楚如何设置对错误答案的反应。
之后我应该在文本字段中输入我的姓氏，当我点击按钮时，文本字段变为只读，如果文本字段中的姓氏错误，则按钮的标签变为“正确”按钮的标签应该变得“不正确再试”，其他一切都保持不变。
非常感谢任何帮助！

Answer 1

将以下代码放在处理文本框文本更改的方法中：

If Lbl.Text = "First Name" Then   
    If TxtBox.Text = "justin" Or TxtBox.Text = "Justin" Then
        Lbl.Text = "Last Name"
        Btn.Text = "Enter"
    Else
        Lbl.Text = "Incorrect. Re-enter."
    End If
Else
    If TxtBox.Text <> "your last name" Then
        Lbl.Text = "Incorrect. Re-enter."
    Else
        Lbl.Text = "Correct."
    End If
End If

在处理按钮的方法中：

If Lbl.Text = "Correct" Then
    Btn.Text = "Correct"
    TxtBox.Enabled = False
Else
    Btn.Text = "Incorrect. Try again."
End IF

如何在VB中处理错误的答案

1 个答案: