首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体Form1上,画一个名称为Shape1的形状控件,将其形状设置为矩形;再向窗体上画3个单选按钮控件,并将它们设置成一个名称为Option1的控件数组,它们的下标分别为0、1、2,标题分别为“矩形”、“正方形”和“椭圆”,且将标题为“矩形”的单选按钮设
在窗体Form1上,画一个名称为Shape1的形状控件,将其形状设置为矩形;再向窗体上画3个单选按钮控件,并将它们设置成一个名称为Option1的控件数组,它们的下标分别为0、1、2,标题分别为“矩形”、“正方形”和“椭圆”,且将标题为“矩形”的单选按钮设
admin
2019-08-21
51
问题
在窗体Form1上,画一个名称为Shape1的形状控件,将其形状设置为矩形;再向窗体上画3个单选按钮控件,并将它们设置成一个名称为Option1的控件数组,它们的下标分别为0、1、2,标题分别为“矩形”、“正方形”和“椭圆”,且将标题为“矩形”的单选按钮设置为选中状态。
要求:编写适当的事件过程,使得程序运行时,单击不同的单选按钮,能将形状控件中的形状设置成选中的单选钮对应的形状,程序运行示意图如图所示。
选项
答案
步骤1:新建一个窗体,在窗体上添加一个Shape控件,并按照表4设置控件的相关属性。 [*] 步骤2:向窗体中添加一个单选按钮控件,然后复制两次创建控件数组,按照表5设置相关属性。 [*] 步骤3:双击其中一个单选按钮,打开代码编辑窗口,在代码编辑窗口的指定位置输入以下代码(画横线部分是需要填入的内容)。 Private Sub Olotion1_Click(Index As Integer)
Shape1.Shape=Index
End Sub 步骤4:调试并运行程序,关闭程序后按题目要求存盘。
解析
新建一个窗体,在窗体上添加一个Shape控件,并设置控件的Shape:属性为0-Rectangle;再添加一个名称为Option1的单选按钮控件数组,包含3个单选按钮,下标分别为0、1、2,其Caption属性分别为“矩形”“正方形”“椭圆”,且标题为“矩形”的单选按钮的Value属性为True;最后为单选按钮控件数组的Click事件添加代码。
转载请注明原文地址:https://jikaoti.com/ti/RYN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在菜单编辑器中建立1个名称为Menu()的菜单项,将其“可见”属性设置为False,并建立其若干子菜单,然后编写如下过程PrivateSubForm_MousDown(ButtonAsInteger,ShiftAsInteger,XAsS
以下打开VisualBasic编辑器的操作中,错误的是
假定有以下循环结构DoUntil条件表达式循环体Loop则以下正确的描述是
设有如下事件过程:PrivateSubForm_Click()x=0Whilex<10x=x+1:x=x*xWendPrintxEndSub运行程序,单击窗体,输出结果是
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionl_Click(IndexAsInteger)…EndSub下面关于此过程的参数Index的叙
假定一个工程由一个窗体文件Form1和两个标准模块文件Mode11和Mode12组成Mode11的代码如下:PublicxAsInteger:PublicyAsIntegerSubS1()
为使文本框具有初始值“VB”,在设计阶段正确的操作是
以下关于通用对话框的叙述中,错误的是()。
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图3.169所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求
以下关系表达式中,其值为True的是
随机试题
现行法律确立了一系列的解释方法,用以确保合同解释符合当事人的真意,主要包括()
肝素的禁忌证有:
患者女性,45岁,行子宫全切术后7天出现阴道内漏尿伴发热,考虑输尿管损伤,此时应采取的措施为
下列各种组织,哪一种再生能力最强
关于增值税征收范围的说法正确的是()。
一般资料:求助者,女性,48岁,公司职员。案例介绍:求助者的儿子在市重点中学读书,学习成绩一直非常优秀。高考前,儿子自己放弃了某名牌大学提前录取的机会,坚持参加高考,但发挥失常,只被普通院校录取。求助者非常生气,怨自己的孩子不争气,不给自己涨面子,
德育组织形式是指()
2013年全国社会物流总额197.8万亿元,同比增长9.5%,增幅比上年回落0.3个百分点。分季度看,一季度增长9.4%,上半年增长9.1%,前三季度增长9.5%。其中,工业品物流总额181.5万亿元,同比增长9.7%,增幅比上年同落0.3个百分点。进口货
Somecitiesgrowverylargebecauseoftwoimportantreasons.First,theremaybeimportantnaturalresourceslikewood,gas,oi
______,thecondorinPeruisthreatenedbytherapidencroachmentofhumans.
最新回复
(
0
)