首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程中有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
57
问题
设工程中有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://kaotiyun.com/show/wehp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
目录列表框Path属性的作用是
在关系运算中,查找满足一定条件的元组的运算称之为【】。
若按功能划分,软件测试的方法通常分为【】测试方法和黑盒测试方法。
结构化设计主要分为系统设计和模块设计,【】的任务是决定系统的模块结构。
下列语句可以为动态数组分配实际元素个数。
文件列表框控件的______属,属性用来确定在列表框中显示的文件类型。
在窗体上面一个命令按钮,其名称为Command1,然后编写如下程序:FunctionFunc(ByValxAsInteger,yAsInteger)y=x*yIfy>0ThenFunc
软件开发的结构化生命周期方法将软件生命周期划分成。
在过程定义中出现的变量名叫做【】参数,而在调用过程时传送给过程的常数、变量、表达式或数组叫做【】参数。
随机试题
市政绩效管理决策系统中联系市政管理机构和社会公众的桥梁是__________。
根据《环境影响评价技术导则一生态影响》,生态评价工作范围应依据()确定。
该塔突出的优点是结构简单、金属耗量小、总价低,主要缺点是操作弹性范围较窄、小孔易堵塞,此塔为()。
目前,上市证券的集中交易主要采用的方式是( )。
新、旧行业并存是未来全球行业发展的基本规律和特点。()
对于每间隔一段时间支付一次利息的债券而言,下列说法中不正确的有()。
作为一名基层干警。你认为如何做一名合格的县公安局局长?
儒家文化及其价值观已经成为中华民族精神的重要因素,那些关于做人、处事和立国的名言早已___________,并在___________中传布到社会生活的各个角落。在民众中儒家思想从来就没有断绝:风俗习惯的传承、传统文学艺术的感染,无不是承载儒门精神的管道。
Wheredoesthewomanwanttogo?
Vacation(休假)timecanbeassimpleasjusttimeawayfromwork.Youmayjustwantto【C1】________homeanddonothing.Thereisn
最新回复
(
0
)