首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Tcxtl中输入口令并按同车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“Teacher
设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Tcxtl中输入口令并按同车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“Teacher
admin
2013-04-11
58
问题
设工程中有2个窗体:Forml、Form2,Forml为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Forml的文本框Tcxtl中输入口令并按同车键(回车键的ASCII码为13)后,隐藏Forml,显示Form2。若口令为“Teacher”,所有菜单项都可见;否则看不到“成绩录入”菜单项。为此.某人在Form1窗体文件中编写如下程序:
Private Sub Text1_KeyPress(KeyAscii As Integer)
IfKeyAscii=13 Then
If Text1.Text=“Teacher”Then
Form2.input.Visible=True
Else
Form2.input.Visible=False
End if
End ff
Forml.Hide
Form2.Show
End Sub
菜单结构
程序运行时发现刚输入口令时就隐藏了Forml,显示了Form2,程序需要修改。下面修改方案中正确的是
选项
A、把Forml中Textl文本框及相关程序放到Form2窗体中
B、把Forml.Hide、Form2.Show两行移到2个End If之间
C、把IfKeyAscii=13 Then改为IfKey Ascii=“Teacher”Then
D、把2个Form2.input.Visible中的“Form2.”删去
答案
B
解析
左原程序中,只要触发文本框控件的keyPress事件。则会执行隐藏Form1,显示Form2语句。所以将Form.Hide和Form2.Show两行移到两个End if之间,在每次输入口令之后,只要不按回车键就不会执行程序,按下后程序会检验是否口令为“Teacher”,是则“成绩录入”可见,否则不可见,之后执行Form1.Hide和Form2.Show。
转载请注明原文地址:https://www.kaotiyun.com/show/wehp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
下列可以打开立即窗口的操作是______。
VisualBasic中窗体文件的扩展名是______。
在关系数据库中,用来表示实体之间联系的是______。
下列关于栈的叙述中正确的是______。
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程:PrivateSubCommand1_Click()A=Te
软件测试是保证软件质量的重要手段,而软件测试的主要和重要的测试方法是通过测试方法是通过测试数据和【】的设计来实现。
在用菜单编辑器设计菜单时,必须输入的项是______。
下列说法中,不属于数据模型所描述的内容的是______。
在过程定义中出现的变量名叫做【】参数,而在调用过程时传送给过程的常数、变量、表达式或数组叫做【】参数。
随机试题
填入下面横线处的句子,排列顺序恰当的一项是()。“全生物快餐盒”是________,________。如果分解,________,________,这种“全生物快餐盒”解决了白色污染,也促进了环保产业的发展。①在一定的湿度和温度下
下列哪项是少阴热化证中“心烦不得眠”的病机
A.瘙痒症B.慢性单纯性苔藓C.湿疹D.夏季皮炎E.扁平苔藓以阵发性剧痒及皮肤苔藓样变为特征的慢性炎症性皮肤病
A、气上B、气下C、气缓D、气结E、气消喜则()
免疫耐受性的终止和破坏是自身免疫病发生的根本机制。()
采用发行债券方式筹集资金可以()。
划线更正法是在错误的文字或数字上划一红线注销,然后在其上端用红字填写正确的文字或数字,并由记账人员加盖图章,以明确责任。()
在计算企业所得税时,企业投资资产成本的扣除方法有()。
职业枯竭是指人们在自己长期从事的工作重压之下,产生身心能量被工作耗尽的感觉。根据上述定义,下列属于职业枯竭状态的是( )
在工作中防止“过”或者“不及”的关键在于
最新回复
(
0
)