首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Textl中输入口令并按回车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“XSLNCER
设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Textl中输入口令并按回车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“XSLNCER
admin
2020-06-30
55
问题
设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Textl中输入口令并按回车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“XSLNCER”,所有菜单项都可见:否则看不到“成绩录入”菜单项。为此,某人在Forml窗体文件中编写如下程序:
Private Sub Text1__KeyPress(KeyAscii As Integer)
If KeyAscii=1 3 Then
If T’eX 1.Text=”XSLNCER”Then
Form2.input.Visible=True
Else
Form2.input.Visible=False
End If
End If
Forml.Hide
Forrn2.Show
End Sub
程序运行时发现刚输入口令时就隐藏了Forml,显示了Form2,程序需要修改。下面修改方案中正确的是 ( )。
选项
A、把2个Form2.input.Visible中的“Form2”删去
B、把Form1中Text1文本框及相关程序放到Form2窗体中
C、把IfKeyAsii=13 Then改为If KeyAscii=“XSLNCER”Then
D、把Forml.Hide、Form2.Show两行移动到2个EndIf之间
答案
D
解析
根据题干的描述,刚刚输入口令的第一个字符时就隐藏了Forml显示Form2,与预期的键入回车时才隐藏Forml显示Form2不符,可以判断是在进行KeyAscii条件判断时出了问题。观察代码可以看到,Forml.Hide和Form2.Show语句处于KeyAscii=13的If判断之外,这样无论键入的第一个字符是否是回车都将执行这两条语句,造成了题干描述的错误现象。解决方案也很简单,只要把这两条语句移到两个End If之间,令其受到KeyAscii=13的If判断即可。
转载请注明原文地址:https://kaotiyun.com/show/j9Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是()。
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger) f=1 Fori=1Toxf=f*i Next s=fEndFunctionPrivateSubCommand1
下面能作为软件需求分析工具的是
执行下面的程序段后,变量S的值为()。S=5Fori=2.6To4.9Step0.6S=S+1Nexti
假定有以下循环结构:DoUntil条件表达式 循环体Loop则以下正确的描述是( )。
下列过程定义语句中,形参数量可变的是()。
窗体上已有的3个单选按钮组成了1个名为ChkOpt1的控件数组。用于区分控件数组ChkOpt1中每个元素的属性是( )。
对下列二叉树进行前序忘记遍历的结果为
下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是
在数据处理中,其处理的最小单位是()。
随机试题
按阿拉伯数字的顺序从0开始,按时间发展分派号码,称为
教师对学生严格要求,学生尊敬教师,接受指导,主动自觉地进行学习。课堂气氛和谐,师生之间往往能形成积极、平等的双向交流。这一类型的师生关系模式属于()。
抗休克的首要措施是尽快恢复有效循环血量,_______为抗休克的首选溶液。
从事零售业务的个体户王某收到税务机关限期缴纳通知书的期限届满后,仍然拖欠营业税款2000元。税务机关对此采用的下列哪一种做法不符合法律规定?
下列选项中不属于工程造价信息管理基本原则的有()。
在国际贸易中,常见的检验证书有()等。
教师在教学中应关注学生的情感态度,其中影响学生学习效果的情感态度的因素不包括______。
教育措施
Inorderto"changelivesforthebetter"andreduce"dependency",GeorgeOsborne,ChancelloroftheExchequer,introducedthe"
以下程序用于求s=1+(1+2)+(1+2+3)+……(1+2+……100)的和,请补充完该程序。DimnAsIntegerDimiAsIntegerDimjAsLongDimsAsLongn
最新回复
(
0
)