大家好,小探来为大家解答以上的问题。vb简单小程序制作教程,简单的vb小程序这个很多人还不知道,现在让我们一起来看看吧!
1、Private Sub Command1_Click() Static n As Integer n = n + 1 a = Text1.Text b = Text2.Text If a = "wanglili" And b = "12345" And n <= 3 Then MsgBox "欢迎您进入本系统!" n = 0 Else If n < 3 Then MsgBox "对不起您不能进入!请重新输入认证信息!" Else MsgBox "对不起。
2、您不能进入本系统!" End If End IfEnd SubPrivate Sub Command2_Click() EndEnd Sub。
本文到此分享完毕,希望对大家有所帮助。