首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后,隐藏For/rd,显示Form2。若口令为“XSLNCE
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后,隐藏For/rd,显示Form2。若口令为“XSLNCE
admin
2018-09-19
47
问题
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后,隐藏For/rd,显示Form2。若口令为“XSLNCER”,所有菜单项都可见:否则看不到“成绩录入”菜单项。为此,某人在Form1窗体文件中编写如下程序:
Private Sub Text1_KeyPress(KeyAsciiAs Integer)
If KeyAscii=13 Then
If Tex1.Text="XSLNCER"Then
Form2.input.Visible=True
Else
Form2.input.Visible=False
End If
End If
Form1.Hide
Form2.Show
End Sub
程序运行时发现刚输入口令时就隐藏了Form1,显示了Form2,程序需要修改。下面修改方案中正确的是( )。
选项
A、把2个Form2.input.Visible中的“Form2”删去
B、把Form1中Text1文本框及相关程序放到Form2窗体中
C、把IfKeyAsii=13 Then改为IfKeyAscii="XSLNCER"Then
D、把Form1.Hide、Form2.Show两行移动到2个End If之问
答案
D
解析
根据题干的描述,刚刚输入口令的第一个字符时就隐藏了Form1显示Form2,与预期的键入回车时才隐藏Form1显示Form2不符,可以判断是在进行KeyAscii条件判断时出了问题。观察代码可以看到,Form1.Hide和Form2.Show语句处于KeyAscii=13的If判断之外,这样无论键入的第一个字符是否是回车都将执行这两条语句,造成了题干描述的错误现象。解决方案也很简单,只要把这两条语句移到两个EndIf之间,令其受到KeyAscii=13的If判断即可。
转载请注明原文地址:https://kaotiyun.com/show/r6Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是( )。
设窗体名称为frmTest,为了在程序代码中将窗体的标题改为"等级考试",其代码应该是
以下关于数组的叙述中,错误的是
有如下数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行上述语句后,不是整型变量的是
如果要在窗体上使用2组单选按钮,每组都可以有一个被选中,则应该做的是( )。
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入
某二叉树中有n个叶子结点,则该二叉树中度为2的结点数为
编写如下程序:PrivateSubCommand1_Click()DimiAsInteger,numAsIntegerDimarr(10)AsIntegerFori=0To10arr(
在关系数据库中,用来表示实体间联系的是
某二叉树的中序序列为DCBAEFG,后序序列为DCBGFEA,则该二叉树的深度(根结点在第1层)为
随机试题
婴儿营养不良最常见的病因是
新华中学请求电力公司增加供电量,行文应用()
简述激素的使用原则和不良反应。
微生物室安装供空气消毒的紫外灯,应置于离操作台面的高度
上海证券交易所和中国结算上海分公司通过()代理派发各上市公司的股息、红利业务。
根据招标方式的特点,物业管理投标人获取招标信息的渠道一般来自公共媒介上采集的公开招标信息和()。
给定材料1.自从美国经济学家熊彼特(JosephSchumpeter)在1911年出版的《经济发展论》中最早提出了以“创新”为核心的经济发展理论之后,各国都非常重视科技进步与技术创新。那么,究竟什么是创新?熊彼特在《经济发展论》中指出,创新是
某果品公司因市场上西瓜脱销,向新疆某农场发出一份传真:“因我市市场西瓜脱销,不知贵方能否供应。如有充足货源,我公司欲购十个冷冻火车皮。望能及时回电与我公司联系协商相关事宜。”农场因西瓜丰收,正愁没有销路,接到传真后,喜出望外,立即组织十个车皮货物给果品公司
Todevelophispoint,theauthorhasused______.Physicaldependenceonalcoholresultsfrom______.
順調に回復しているので、もうすぐ退院できるでしょう。回復
最新回复
(
0
)