求用VB做一个登陆界面和欢迎界面
发布网友
发布时间:2024-08-20 04:26
我来回答
共1个回答
热心网友
时间:2024-08-29 09:14
Private Sub cmdOK_Click() '按钮cmdOK
If Text1.Text = "user" Then '当输入user时
If Text2.Text = "password" Then
form2.Show '显示主窗口
Else
MsgBox "密码错请重试!", 1 + 16, "登录"
End If
Else
MsgBox "用户名错请重试!", 1 + 16, "登录"
End If
End Sub