首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程中有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
62
问题
设工程中有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全国计算机二级
相关试题推荐
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是( )。
向文本框中输入字符时,下面能够被触发的事件是( )。
以下关于窗体的叙述中错误的是( )。
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommand1_Click() Dimch$,asciiAsInteger Open"file.txt"ForInpu
设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是( )。
设有关系表学生S(学号,姓名,性别,年龄,身份证号),每个学生学号唯一。除属性学号外,也可以作为键的是
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是( )。
(1)在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为
随机试题
试述我国外科的发展与成就
A、羊水中脂肪细胞比例B、羊水中胆红素值C、B超测双顶径值D、羊水中L/S比值E、羊水中染色体检查检查胎儿先天畸形用()
A、鞣质B、胆汁酸C、柴胡D、黄芪E、马钱子有效成分为四环三萜皂苷类的是()
营养性巨幼细胞性贫血主要临床表现不包括
洪某用家庭共有财产20万元出资设立了一家个人独资企业,但是申请企业登记时候没有明确以家庭共有财产出资,关于企业债务下列说法正确的是:()。
泥石流流通区主要采取的防治措施为()。
以下科目中不属于流动资产的是()。
最高人民检察院对()负责。
抗日战争时期,国民政府“战时须作平时看”的教育方针是一项短视的政策。
类是一个支持集成的抽象数据类型,而对象是类的【】。
最新回复
(
0
)