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
百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读,免费范文网,提供经典小说教育文库程序设计VB考试复习题(3)在线全文阅读。
相关推荐: