首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程中有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
25
问题
设工程中有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://jikaoti.com/ti/WHS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程:PrivateSubOptionl_Click(IndexAsInteger)EndSub下面关于此过程的参数I
在窗体上画多个控件,其中有一个名称为Text1的文本框,影响Text1的Tab顺序的属性是
设有语句:Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是()。
假定有以下循环结构:DoUntil条件表达式 循环体Loop则以下正确的描述是( )。
下列过程定义语句中,形参数量可变的是()。
执行语句DimX,YAsInteger后,()。
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("输入数据")) Text1=
在窗体上画一个列表框,其名称为List1,通过属性窗口输入若干数据项,如图1所示。请编写一个事件过程,程序运行后,如果单击窗体,则把数据项"Newitem"加到列表框中,如图2所示。以下能实现该操作的事件过程是
下面描述中不属于数据库系统特点的是
对关系S和关系R进行集合运算,结果中既包含关系S中的所有元组也包含关系R中的所有元组,这样的集合运算称为()。
随机试题
左面神经核损伤,可表现
患者,女,28岁。平素月经规律,28天一次,每次持续3~4天。其末次月经是2014年6月11日,距末次月经已有8周,现患者感觉疲乏,乳房触痛明显。该女士的化验报告提示尿妊娠反应(+),此化验的原理是检查体内的
某女士因患有子宫脱垂住院治疗,她向护士询问自己患有该病的原因,护士解答时告知发生子宫脱垂的常见因素,下列错误的是
建设工程设计合同条款规定,发包人应按合同约定向设计人发出指示,发包人的指示应盖有发包人单位章,并由()签字确认。
某水利工程业主与承包商签订了工程承包合同,合同中含有两个子工程,估算工程量甲项为2300m3,乙项为3200m3;甲项单价为180元/m3,乙项单价为160元/m3。承包合同规定:(1)开工前业主应向承包商支付合同价20%的预付款;(2
下列各项中,自取得项目第一笔生产经营收入年度起,享受企业所得税“三免三减半”优惠政策的有()。
论述我国从建国到党的八大期间社会主要矛盾的演化及党所采取的措施。
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0Printn\10
以下选项中,能正确进行字符串赋值的是
Thepriceofpetrolseemsto______everyyear.
最新回复
(
0
)