下图中,图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框,要求用户输入口令,输入完毕后单击“确定”按钮。如果输入的口令正确,则显示图2的界面。如果输入的门令错误,则出现图3的信息框。单击图1中的“取消”按钮,则结束程序。 Private Sub

admin2013-01-23  46

问题 下图中,图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框,要求用户输入口令,输入完毕后单击“确定”按钮。如果输入的口令正确,则显示图2的界面。如果输入的门令错误,则出现图3的信息框。单击图1中的“取消”按钮,则结束程序。
Private Sub  iommand1_ Click ()
Dim passwor As String
password = Text1. Text
if password = "Myname" then
【  】
form1. Show
Else
d = MsgBox(【  】)
Refresh
End if
End Sub
Private Sub command2_ Click()
【  】
End Sub
在图1的窗体中,文本框对象的名称属性是【  】。

选项

答案Unload Me,“口令非法!”,vbOKOnly,“学生管理信息系统”,End, Text

解析 这是个多窗口操作程序,要注意窗口之间的打开和关闭。MsgBox函数的格式是:“MsgBox(提示信息[,按钮常数][,信息框标题][,帮助文件])”,End是结束运行、关闭所有窗口,UnLoad Me是关闭当前窗口。
转载请注明原文地址:https://kaotiyun.com/show/25hp777K
0

最新回复(0)