程序设计VB考试复习题(3)

Return End If

If LoginCount = 3 Then

MsgBox(\登录失败已经达到三次，当日不能登录！\, MsgBoxStyle.Information, \警告\) TextBox1.Text = \ TextBox2.Text = \ End If

If TextBox1.Text = \ And TextBox2.Text = \ Then

MsgBox(\登录成功！\, MsgBoxStyle.Information, \提示\) TextBox1.Text = \ TextBox2.Text = \

Else

If LoginCount = 3 Then

MsgBox(\登录失败已经达到三次，当日不能登录！\, MsgBoxStyle.Information, \警告\)

TextBox1.Text = \ TextBox2.Text = \ Return End If

LoginCount = LoginCount + 1

MsgBox(\登录失败！请重新登录！\, MsgBoxStyle.Information, \提示\) TextBox1.Text = \ TextBox2.Text = \ End If End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Close() End Sub End Class