VB 学生档案管理的程序

所需积分/C币:4 2009-05-07 08:21:18 23KB APPLICATION/X-RAR

Private Sub Command1_Click() If Text1.Text = "admin" And Text2.Text = "admin" Then Form1.Hide Form3.Show Else If Text1.Text = "admin" Then MsgBox ("你输入的密码有误") Text2.Text = "" Text2.SetFocus Else MsgBox ("你输入的帐号不存在") Text1.Text = "" Text1.SetFocus End If End If End Su

...展开详情
img
onceqq

关注 私信 TA的资源

上传资源赚积分,得勋章
    最新推荐