VB制作QQ登录框【里面的图是大概的登录判断,不知道这样写判断好不好,效率安全等方面考虑~~】
Private Sub Check1_Click()MsgBox " 暂未开发", , "呃.."End SubPrivate Sub Check2_Click()MsgBox " 暂未开发", , "呃.."End SubPrivate Sub Command1_Click()MsgBox " 暂未开发", , "呃.."End SubPrivate Sub Command2_Click()If username = "" ThenMsgBox "用户名不可为空!", , "提示"ElseIf pass
原创
2010-11-26 19:43:00 ·
1397 阅读 ·
0 评论