制作简单的vb登陆界面代码，适合初学Private Sub Command1_Click() If Text1 = "" Or Text2 = "" Then MsgBox "用户名或密码不能为空", vbOKOnly + vbInformation, "提示" Exit Sub End If