首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCⅡ码为13)后,隐藏Form1,显示Form2。若口令为“XSLNCER”
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCⅡ码为13)后,隐藏Form1,显示Form2。若口令为“XSLNCER”
admin
2018-05-08
53
问题
设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCⅡ码为13)后,隐藏Form1,显示Form2。若口令为“XSLNCER”,所有菜单项都可见:否则看不到“成绩录入”菜单项。为此,某人在Form1窗体文件中编写如下程序:
Private Sub Text1_KeyPress(KeyAscii As 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个EndIf之间
答案
D
解析
根据题干的描述,刚刚输入口令的第一个字符时就隐藏了Form1显示Form2,与预期的键入回车时才隐藏Form1显示Form2不符,可以判断是在进行KeyAscii条件判断时出了问题。观察代码可以看到,Form1.Hide和Form2.Show语句处于KeyAscii=13的If判断之外,这样无论键入的第一个字符是否是回车都将执行这两条语句,造成了题干描述的错误现象。解决方案也很简单,只要把这两条语句移到两个End If之间,令其受到KeyAscii=13的If判断即可。
转载请注明原文地址:https://kaotiyun.com/show/AqGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若将变量TestDate声明为Date类型,则下列为变量TestDate赋值的语句中正确的是()。
执行下面的程序段后,变量S的值为()。S=5Fori=2.6To4.9Step0.6S=S+lNexti
以下能从字符串”VisualBasic”中直接取出子字符串“Basic”的函数是()。
如果把文本框的Enabled属性设置为False并运行程序,则以下叙述中正确的是
设变量x中的值是395,则下面语句的输出是Printx\100+((xMod100)\10)*10+(xMod10)*100
已知a=6,b=15,c=23,则语句PrintSgn(a+bMod6-c\a)&a+b的输出结果为
计算下面分段函数的正确语句是
以下不可以作为“容器”的控件是
某二叉树中有n个叶子结点,则该二叉树中度为2的结点数为
随机试题
精索内不含有
A.油性皮肤B.干性皮肤C.混合性皮肤D.中性皮肤E.敏感性皮肤皮脂分泌旺盛,皮肤多油,毛孔大的是
患者女,56岁。近日心悸,头晕乏力,面色无华,神疲倦怠,舌质淡红,脉象细弱,首选
甾体皂苷元的结构特点是
英译汉:“Venezuela”,正确的翻译为( )。
遇到挫折和失败,有的人会以“天将降大任”等格言自勉,愈挫愈勇;有的人则会自暴自弃,一蹶不振。这体现了人格的()特征。
我国《民法通则》第124条规定:“违反国家保护环境防止污染的规定,污染环境造成他人损害的,应当依法承担民事责任。”请问:本法条体现了什么责任归责原则?意义何在?
根据《中华人民共和国仲裁法》规定,仲裁裁决做出后,当事人就同一纠纷再申请仲裁或向人民法院起诉的,仲裁委员会或者人民法院不予受理。这体现了仲裁的()
在VisualFoxPro表中,为了放置照片信息合理使用的字段类型是()。
Whatwasthefirstlanguage?Howdidlanguagebegin,andwhereandwhen?Untilrecently,asensiblelinguistwouldlikelyto【S1】
最新回复
(
0
)