当前位置:首页 > 资讯 > 正文

vb趣味小程序实例_简单的vb小程序

来源:互联网    时间:2023-03-15 14:09:19


(资料图片)

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。

本文分享完毕,希望对你有所帮助。

关键词:

精心推荐

X 关闭

X 关闭