首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上画1个命令按钮,其名称为C1,标题为“等级考试";再画1个文本框,名称为T1,如图3.184(a)所示。请编写适当的事件过程,使程序运行后,一旦文本框中的信息有任何变化或输入任何信息,则命令按钮消失,并使命令按钮的标题在文本
(1)在名称为Form1的窗体上画1个命令按钮,其名称为C1,标题为“等级考试";再画1个文本框,名称为T1,如图3.184(a)所示。请编写适当的事件过程,使程序运行后,一旦文本框中的信息有任何变化或输入任何信息,则命令按钮消失,并使命令按钮的标题在文本
admin
2017-09-22
38
问题
(1)在名称为Form1的窗体上画1个命令按钮,其名称为C1,标题为“等级考试";再画1个文本框,名称为T1,如图3.184(a)所示。请编写适当的事件过程,使程序运行后,一旦文本框中的信息有任何变化或输入任何信息,则命令按钮消失,并使命令按钮的标题在文本框中显示出来,如图3.184(b)所示。
注意:存盘时,将文件保存至考生文件夹下,窗体文件名为sjt1.frm,工程文件名为sjt1.vbo。
(2)在名称为Form1、标题为“菜单演示”的窗体上画一个名称为Label1、标题为空的标签;再建立一个菜单,各菜单项的属性设置见下表。窗体外观如图3-185(a)所示。
请编写适当的程序,使得选中“输出窗体标题”菜单项时,就在标签中显示窗体标题;选中“输出当前时间”菜单项时,在标签中显示当前系统时间(如图3.185(b)所示)。要求程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时,将文件保存至考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
选项
答案
(1)步骤1:新建一个“标准EXE”工程,按要求画出控件并设置相应属性。 步骤2:打开代码编辑窗口,编写文本框的Change事件过程。参考代码: Private Sub T1_Change() C1.Visible=False T1.Text=C1.Caption End Sub 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:新建一个“标准EXE”工程,选择【工具】→【菜单编辑器】命令,打开菜单设计器,按要求设置建立菜单项。 步骤2:打开代码编辑窗口,编写两个底层菜单命令的单击事件过程。参考代码: Private Sub Clock Click() Label1.Caption=Time End Sub Private Sub Title Click() Label1.Caption=Form1.Caption End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)本题需在文本框的Change事件中,改变C1的Visible属性以及为文本框的Text属性赋值为命令按钮C1的Caption属性。
(2)本题除了按照要求设置控件的属性以及菜单之外,还需要编写菜单项事件,把窗体标题和当前时间显示在标签中。
转载请注明原文地址:https://kaotiyun.com/show/ujGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了在窗体上建立2组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
随机文件使用Put语句写数据,使用【】语句读数据。
启动窗体在【】对话框中指定。
程序执行结果s的值是【】。PrivateSubsub1(ByvalpAsInteger)p=p*2EndSubPrivateSubCommand1_Click()DimiAsIntegeri=3Callsub1(i
一个完整的程序必须完成3个层次的过程,它们分别是编码、测试和【】。
如果准备读文件,打开顺序文件“text.dat”的正确语句是
随机试题
A.哌甲酯B.地西泮C.苯巴比妥D.丙戊酸钠E.匹莫林多动性障碍伴有癫痫发作时首选
下列属于员工报酬形式的是()。
应用文中,表第三人称的词语是()
药物制剂设计的基本原则不包括
子宫肌瘤与子宫腺肌病共同点包括
根据统计表的作用可以将统计表分为()。
狭义教育
EnvironmenthastakenratherabackseatpoliticallysincetheEarthsummitinRiodeJaneironearlyfiveyearsago.【C1】______th
Answerthequestionsbelow.ChooseNOMORETHANTHREEWORDSAND/ORANUMBERfromthepassageforeachanswer.Writeyouranswers
Shynessisthecauseofmuchunhappinessforagreatmanypeople.Shypeopleareanxiousand【B1】______;thatis,theyareexces
最新回复
(
0
)