我正学着VB编写程序！请高手帮忙！

来源：百度知道编辑：UC知道时间：2024/06/19 17:28:10

编写程序，开始运行时，提示“请输入口令”，当输入的口令正确（设口令为abcde）则显示“欢迎使用飞腾公司销售系统”窗体；若口令输入错误，则弹出对话框,提示“对不起，口令错”窗体，单击“确定”后可以重新输入口令。

Private Sub Form_click()
x=inputbox("请输入口令")
if x=abcde then
unload form1
form2.show
msgbox "欢迎使用飞腾公司销售系统"
else
msgbox "对不起，口令错"
end if

添加窗体里面有一个login是微软设计的登录窗体，可以直接使用

下本电子书自己看吧

IF XXXX
ELSE XXXXX