邮政银行发放贷款时间:用VB怎么编写登录验证的程序?

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 03:19:03
本人重拾VB,现在在设置窗体是,用了登录的窗口,还得验证,还要提示使用了非法字符,只允许26个字母和10个阿拉伯数字,这样的程序怎么编写,QQ151371614,谢谢了。

这里只是给出很简单的代码,你可以根据这个进行修改
Private Sub Command1_Click()
If Text1.Text <> "123456" Then
MsgBox "密码错误"
End If
End Sub
'下面是限制text1的内容只能为0-9的数字,要加入字母可以照字母的Ascii码加入即可
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < Asc(0) Or KeyAscii > Asc(9) Then
KeyAscii = 0
MsgBox "你输入了非法字符"
End If
End Sub