首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sj3.vbp,窗体上有一个单选按钮数组,名称为Optionl,含4个单选按钮,它们的Index属性分别为O、1、2和3,标题依次为“Iteml”、“Itera2”、“Item3”和“Item4”,再画一个名称为Textl
(1)在考生文件夹下有一个工程文件sj3.vbp,窗体上有一个单选按钮数组,名称为Optionl,含4个单选按钮,它们的Index属性分别为O、1、2和3,标题依次为“Iteml”、“Itera2”、“Item3”和“Item4”,再画一个名称为Textl
admin
2009-08-26
73
问题
(1)在考生文件夹下有一个工程文件sj3.vbp,窗体上有一个单选按钮数组,名称为Optionl,含4个单选按钮,它们的Index属性分别为O、1、2和3,标题依次为“Iteml”、“Itera2”、“Item3”和“Item4”,再画一个名称为Textl的文本框。
窗体文件中已经给出了Optionl的Click事件过程,但不完整,要求去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使得在运行时单击“Iteml”或“Item2”单选按钮时,在Textl中显示“选择Iteml”或“选择Item2”,单击“Item3”或“Itern4”单选按钮时,在Textl中显示“Item3被选择”和“Itern4被选择”。程序运行界面如图35—3所示。
注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sj4.vbp,Form1窗体中有一个文本框,名称为Textl,两个框架,名称分别为Framel和Frame2、标题分别为“科目”和“难易”;在Framel中有两个单选按钮Optionl和Option2,标题分别为“数学”和“语文”;在Frame2中有两个单选按钮Option3和Option4,标题分别为“困难”和“简单”;一个命令按钮,名称为Commandl,标题为“输出”。程序运行界面如图35—4所示。
请编写适当的事件过程,使得在运行时,在Framel和Frame2中各选一个单选按钮,然后单击“输出”按钮,输出“我觉得数学困难”、“我觉得数学容易”、“我觉得语文困难”和“我觉得语文容易”之一。
选项
答案
(1)程序中需要检测单选按钮的状态,这可以通过Value属性来实现。如果单选按钮被选中,则其Value值为1;否则Value值为0。当建立控件数组时,系统给每个元素赋一个唯一的索引号(Index),通过属性窗VI的Index属性,可以知道该控件的索引号是多少。标签和单选按钮的标题均由各自的Caption属性设置。 根据题意,将一组Option放到对话框中,包含4个单选按钮,Index分别为0、1、2和3,Caption分别为“Iteml”“Item2”“Item3”和“Item4”,一个文本框控件,名称为Textl,Text属性为空。补充后的具体代码如下: Private Sub Optionl_Click(Index As Integer) If Index=1 Or Index=0 Then Textl.
Text
="选择"+Optionl.Item
(Index).Caption
EIse Textl.
Text
=Optionl.Item
(Index).Caption
+"被选择" End If End Sub 单击[*]按钮运行程序,并按要求保存。 (2)程序中需要检测的单选按钮的状态,通过Value属性来实现,如果单选按钮被选中,则Value值为1,否则Value值为0。在文本框中显示内容通过Text属性实现。 根据题意,将2个框架控件、4个单选按钮控件、1个文本框控件和1个命令按钮添加到窗体中,框架的Caption属性分别为“科目”和“难易”,单选按钮的名称分别为Optionl、Option2、Option3和Option4,Caption分别为“数学”、“语文”、“困难”和“容易”,其中Optionl和Option3的Value为True,命令按钮的名称为Commandl、Caption属性为“输出”。补充后的具体代码如下: Private Sub Commandl_Click() Dim str As String str="我觉得" If Optionl.
Value
=True Then str=str+Optionl.
Caption
’选中数学 Else str=str+Option2.
Caption
’选中语文 End If If Option3.
Value
=True Then str=str+Option3.
Caption
’选中困难 Else str=str@Option4.
Caption
’选中简单 End If Textl.
Text
=str End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/3c1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于栈的叙述中正确的是()。
下列叙述中正确的是()。
为用户与数据库系统提供接口的语言是()。
数据的存储结构是指()。
由关系数据库系统支持的完整性约束是指【】和参照完整性。
采用面向对象技术开发的应用系统的特点是()。
用树形结构来表示实体之间联系的模型称为()。
在AWT包中,创建一个具有10行、45列的多行文本区域对象ta的语句为【】。
对如下二叉树进行后序遍历的结果为()。
随机试题
内地居民同香港居民、澳门居民、台湾居民、华侨在中国内地自愿离婚的,当事人有下列哪些情形的,婚姻登记机关不予受理?()
错误选项为:C;正确写法为:VESSEL:GLORIAV.123DATEDAPRIL30,2004根据UCP600第20条,当提单上显示从起运港的船只是预期(INTENDED)船时,即使预期船只与实际装运船只一致,提单的装船批注(ONBOARD
对于商用房贷款抵押物,以下说法错误的是()。
以下关于可转换债券的说法中,正确的有()。(2004年)
材料:初二(3)班的汤老师在辅导学生上晚自习时因私事偷偷外出,快放学的时候才回来。他回来时发现小李正在偷偷写情书,为了让其他同学引以为戒,汤老师将小李的情书在班上念了出来,引得全班哄堂大笑。小李觉得没面子,请假回家休息了。班上的小敏喜欢
某次考试有一道多项选择题,共有A、B、C三个选项。参加考试的人中,共有20人选了A,15人选了B,10人选了C。其中选了两个选项的有5人,选了三个选项的有3人,还有2人未答此题。问有多少人参加考试?
马斯洛的需要层次理论中的最高层次是()。
Ayoungmangoingtojointhearmy(军队)andhadto【C1】________amedicalexamination.Thedoctorwassittingatadeskwhenhec
Whatrecommendationsdoesthetutormakeaboutthereferencebooks?AAllBResearchmethodCMainBodyDConclusionE
Tobereallyhappyandreallysafe,oneoughttohaveatleasttwoorthreehobbies,andtheymustallbereal.Itdoesn’tmatte
最新回复
(
0
)