Question

vb程序设计编写程序验证输入密码是否正确

Answer 1

先设计好界面，（如：用标签控件，2个文本框，）在1个要输密码文本框的属性名称中输入password,在要输入名称的文本框的属性名称中输入username.在设置字体 想要输入错误密码三次退出程序方法如下； 在密码的代码框中输入：unload.me chick=3. End sub

Answer 2

在窗体form1上添加一个textbox和commandbutton控件，如果textbox的值是123则显示另外一个窗体( ow)如果错误则用msgbox显示密码错误.设置Textbox的PasswordChar为*.

Option Explicit
Const vbKeyDecPt = 46

Private Sub Command1_Click()
If Val(Text1) = 123 Then
Form2.Show
Me.Hide
Else
MsgBox "密码不正确,请重新输入", vbExclamation + vbOKOnly, "提示"
Text1.SetFocus
Text1.SelStart = 0
Text1.SelLength = Len(Text1)
Exit Sub
End If
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer) '限制textbox只能输入数字
If (KeyAscii >= vbKey0 And KeyAscii <= vbKey9) Or KeyAscii = vbKeyDecPt Or KeyAscii = vbKeyBack Then
Exit Sub
ElseIf KeyAscii = vbKeyReturn Then
Call Command1_Click
Else
KeyAscii = 0
End If
End Sub

Answer 3

人民的名义