首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个单选按钮数组,含三个单选按钮,均没有标题,请利用属性窗口,为单选按钮依次添加标题为“北京”、“上海”、“广州”;再添加一个标题为“显示”的命令按钮,如图3.75所示。程序的功能是在运行时,如果选
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个单选按钮数组,含三个单选按钮,均没有标题,请利用属性窗口,为单选按钮依次添加标题为“北京”、“上海”、“广州”;再添加一个标题为“显示”的命令按钮,如图3.75所示。程序的功能是在运行时,如果选
admin
2020-02-27
59
问题
(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个单选按钮数组,含三个单选按钮,均没有标题,请利用属性窗口,为单选按钮依次添加标题为“北京”、“上海”、“广州”;再添加一个标题为“显示”的命令按钮,如图3.75所示。程序的功能是在运行时,如果选中一个单选按钮后,单击“显示”按钮,则根据单选按钮的选中情况,在窗体上显示“我的出生地是北京”、“我的出生地是上海"或“我的出生地是广州”。
要求:①依次添加单选按钮标题为“北京”、“上海”、“广州”;设初始选中的是“上海”,添加命令按钮标题为“显示”。②去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4.vbp,请在Form1窗体中画三个标签,名称分别为B1、B2、L1,标题分别为“字号”、“字体"、“计算机等级考试”,其中L1的高为500,宽为3000;再在B1、B2标签的下面画两个组合框,名称分别为Cb1、Cb2,并为Cb1添加项目:“10”、“15”、“20”,为Cb2添加项目:“黑体"、“隶书”、“宋体”。请编写适当的事件过程,使得在运行时,当在Cb1中选一种字号、Cb2中选一种字体时,标签L1中的文字立即变为选定的字号和字体。如图3.76所示。
注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须选择一种字号和字体。必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,按原文件名存盘,程序中不得使用任何变量。
选项
答案
(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,依次选中窗体中的各单选按钮和命令按钮,设置它们的相关属性,其属性及值如表4-47所示。 [*] 步骤2:双击“显示”命令按钮,打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: PriVate Sub Cl_Click() For i=0 To 2 If Op1(i).Value=True Then Print"我的出生地是"+Op1(i).Caption End If Next End Sub 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjl4.vbp,如表4-48画出三个标签和两个组合框并设置属性。 [*] 步骤2:在代码编辑窗口,编写两个组合框的单击的单击事件过程。参考代码: Private Sub Cb1_Click() L1.FontSize=Cb1.Text End Sub PriVate Sub Cb2_Click() L1.Font=Cb2.Text End Sub 步骤3:按
键运行程序并选择一个字号和字体,然后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。
解析
(1)本题要求通过修改程序源代码,来实现当选中不同选项时,单击命令按钮,即在窗体显示出不同信息的功能。程序源代码在按钮的Click事件过程中,利用For循环语句逐一判断单选按钮数组中每个元素当前是否被选中,若选中则通过在窗体中用Print语句显示出相关信息。因为单选按钮数组一共有三个元素,且数组索引号(Index属性值)从0开始,故循环语句的初值为0,终值为2。
(2)组合框的Text属性可以返回当前选中的列表项内容,本题只需要分别在两个组合框的Click事件中令标签的相应字体属性等于组合框当前选中项的内容即可。
转载请注明原文地址:https://kaotiyun.com/show/NRTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下列语句:strInput=InputBox("请输入字符串","字符串对话框","字符串")将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是()。
在数据管理技术发展的三个阶段中,数据共享最好的是()。
编写如下程序代码:OptionBase1Dimarr()AsIntegerFrivateSubCommand1_Click()DimiAsIntcger,jAsIntegerReDimarr(3,2)Fori=1To3
窗体上有1个名称为List1的列表框,1个名称为Text1的文本框。编写如下程序代码:PrivateSubForm_Load()List1.AddItem"花卉"List1.AddItem"绿植"List1.AddItem"盆景"Text1.
某系统结构图如下图所示该系统结构图的宽度是()。
已知列表框控件List1中已放入若干表项,下列关于List1的叙述中错误的是()。
在长度为n的顺序表中查找一个元素,假设需要查找的元素一定在表中,并且元素出现在表中每个位置上的可能性是相同的,则在平均情况下需要比较的次数为()。
下列关于线性链表的描述中,正确的是()。Ⅰ、只含有一个指针域来存放下一个元素地址Ⅱ、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)Ⅲ、结点由两部分组成:数据域和指针域。
层次型、网状型和关系型数据库划分原则是( )。
设a=2,b=3,c=4,d=5,下列表达式的值是()。3>2*bOra=cAndb<>cOrb<>a+c
随机试题
Myfatheroftenworksveryhard:Andhehas【C1】______toseeafilm.HereI’lltellyou【C2】______abouthim.Oneafternoon,whe
下列药物中,具有杀虫,疗癣功效的药物是
干燥保藏食品需将食品的水分降至何种程度
有利于防水、防潮,并能调整地基土的不均匀沉降,适用于地基土承载力较低的基础是()。
背景资料:某工贸集团决定新建一机械制造厂,通过招标方式与市建工集团安装公司签订了工程施工合同。因该安装公司没有能力完成土建工程施工,经业主同意,将基础工程、屋面工程和装修工程分包给了市建工集团星鼎公司。开工日期为2016年5月18日,合同工期67天。施工
在限制明星天价片酬,影视内容生产、采购成本得到有效_________所引发的连锁反应中,平台虽然是受益匪浅的一方,但绝不是唯一的获利者,_________明星本身而言,平台的内容成本控制迫使天价演员走下神坛,未成名演员_________,新人效应逐渐明显。
Illiteracymaybeconsideredmoreasanabstractconceptthanacondition.WhenafamousEnglishwriterusedthe(1)_____overt
(46)Theanswerdependsonwhatkindofsystemisultimatelyadopted.(47)Thefirstisaspecial-purposelanesystem,inwhichcer
WhatmemorandumdidPresidentWilliamJ.Clintonissue?
Theindustrialsocietieshavebeenextremelyproductiveduringthelasttwocenturies.Theeconomicadvancehasbeen【C1】______
最新回复
(
0
)