首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下图中,图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框,要求用户输入口令,输入完毕后单击“确定”按钮。如果输入的口令正确,则显示图2的界面。如果输入的门令错误,则出现图3的信息框。单击图1中的“取消”按钮,则结束程序。 Private Sub
下图中,图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框,要求用户输入口令,输入完毕后单击“确定”按钮。如果输入的口令正确,则显示图2的界面。如果输入的门令错误,则出现图3的信息框。单击图1中的“取消”按钮,则结束程序。 Private Sub
admin
2013-01-23
111
问题
下图中,图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
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
己知一棵二叉树的前序遍历为ABDECF,中序遍历为DBEAFC,则对该树进行后序遍历得到的序列为
在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1,然后编写如下两个事件过程:PrivateSubCommand1_Click()a=InputBox("请输入一个字符串")Text1
假定窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应执行的操作是
随机生成的10个两位数,求出它们的总和和平均数。产生两位数采用的算法如下:分别产生个位数(0~9)和十位数(1~9),然后十位数乘10再加上个位数即得到一个两位数。说明:在窗体上有一个Command1按钮,单击它将计算10个随机数的和以及平均数,并
当用户要自定义鼠标指针图形,除要对MouseIcon属性进行设置外,还必须将MousePointer属性设置为()。
不能在标准模块中使用或定义的是()。
关于结构化程序设计原则和方法的描述错误的是
软件结构中各模块之间相互连接关系的一种度量常称为模块的【】。
调试窗口中的()可显示当前过程所有局部变量的当前值。
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
随机试题
某公司债券面值100元,票面利率4%,若每季度计息一次,年终付息,按照复利计算其每年利息为()。
下列属于增加骨量的方法是
A.消瘦、乏力、腹胀B.贫血、出血C.腹泻、蜘蛛痣D.腹腔积液E.肝脏进行性肿大、血性腹腔积液肝硬化合并肝癌的临床表现是
依据监理合同示范文本规定,下列监理工作中,属于附加监理工作的是()
已知某手机企业2002-2009年在手机新技术研发上的投入额,如表4—3所示。根据上述资料请回答:当给定显著性水平α=0.05,对2010年该公司在手机新技术研发上的投入额进行均值区间估计()。
资产负债表中的“存货”项目包括()。
有三根铁丝,分别长384厘米、444厘米、504厘米。把它们截成同样长的整厘米小段,每四段组成一个正方形,则至少可以组成多少个大小相同的正方形?()
某宿舍的女生全部报名参加了考研,关于录取情况有如下几项陈述:(1)该宿舍有的女生被录取了;(2)该宿舍有的女生没有被录取;(3)并非该宿舍有的女生没有被录取;(4)该宿舍的王玲以优异的成绩被录取了。如果以上
例如:那座桥800年的历史有了那座桥有800年的历史了。祝你顺利一切
A、Heshouldbringhiscousintothepicnic.B、Thepicnicisgoingtobeverycrowded.C、She’ssorrythemancan’tcome’tothep
最新回复
(
0
)