首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。
admin
2016-01-31
67
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将所选的值作为形状控件的填充参数。例如,选择3,则形状控件中被竖线填充。如图3-22所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
审题分析 当形状控件的Shape属性值是3时显示为圆;形状控件的填充色样式通过FillStyle属性设置,其中0为实线、1为透明、2为水平线、3为垂直线、4为向上对角线、5为向下对角线、6为交叉线、7为对角交叉线,缺省值为1。要通过单击列表框中的项目,来改变形状控件的填充样式,需在列表框的Click事件过程中,用语句将列表框中所选的值(通过其Text属性返回)作为形状控件的填充参数。 操作步骤 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个列表框和一个形状控件,并分别如表4-15设置它们的相关属性。 [*] 步骤3:打开代码编辑窗口,编写列表框的Click事件过程: 参考代码: Private Sub List1 Click() Shape1.FillStyle=List1.Text End Sub 步骤4:按要求将文件保存至考生文件夹中。 考点链接 图形控件、选择控件
解析
转载请注明原文地址:https://kaotiyun.com/show/0uLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:PrivateSubCommandl_Click()Dima(5)Fori=0To4A(i)=i+1t=i+1
有如下事件过程:PrivateSubCommandl_Click()b=10DoUntilb=-1a=InputBox(“请输入a的值”)a=Val(A)b=InputBox(“请输
组合框控件是将()组合成一个控件。
下列程序段的执行结果为______。Dimm(3,3)AsIntegerDimiAsIntegerDimjAsIntegerDimxAsIntegerFori=1To3m
与键盘操作有关的事件有KeyPress、KeyUp和KeyDown事件,当用户按下并且释放一个键后,这三个事件发生的顺序是()。
软件工程研究的内容主要包括:【】技术和软件工程管理。
对软件设计的最小单位(模块或程序单元)进行的测试通常称为测试。
选择循环结构的作用是()。
常见的软件工程方法有结构化方法和面向对象方法,类?继承以及多态性等概念属于【】。
在软件工程中,白盒测试法可用于测试程序的内部结构。此方法将程序看做是______。
随机试题
下列哪种情况可能有.AB增加和AB>SB
A.雌激素B.雄激素C.雌激素和雄激素D.LHE.FSH肾上腺皮质产生:
社会教育中最经常使用的方法是()
患儿因中度脱水补累计损失量3小时后有尿,此时输液瓶内尚有250ml无钾液体,最多可加15%氯化钾的量为
患者,女性,25岁,妊娠5个月。因转移性右下腹痛2小时就诊,经检查诊断为急性阑尾炎。下列治疗措施中,错误的是
在甲、乙的下列债权、债务关系中只能由乙主张抵销权的是:()
申请人因对扣缴义务人的扣缴税款行为不服而申请行政复议的,被申请人是()。
()是指员工要求离开现任职位,与企业解除劳动合同,退出企业工作的人事调整活动。
某工程,由甲乙两队承包,2(2/5)天可以完成,需支付1800元,由乙丙两队承包,3(3/4)丢天可以完成,需支付1500元,由甲丙两队承包,2(6/7)天可以完成,需支付1600元。问在保证一星期内完成的前提下,选择一个队单独承包的最少费用为多少?(
往返票
最新回复
(
0
)