编写密码登陆器应用小程序

1、打开VB编程，建立标准EXE。

2、建立一个文本框，名称改为T1，建立三个命令按钮，caption改为开始，确定，退出，建立一个图像框，名称改为P1.

3、点击开始按钮，进入代码编辑器，

T1 = ""

T1.SetFocus

4、点击确定按钮，进入代码编辑器，

If T1.Text = "123456" Then

P1.Picture = LoadPicture("D:\My Documents\My Pictures\1.jpg")
MsgBox ("密码正确！")
Else
MsgBox ("密码错误！请再次输入！")

5、点击确定按钮，进入代码编辑器，

end

6、

7、现在运行一下，

8、点击开始，输入一个错误的密码456123，点击确定。这时提示密码错误。

9、现在我们点击开始，再次输入密码“123456”，点击确定。