首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上添加一个名称为Shapel的形状控件,在属性窗口中将其形状设置为圆形。添加一个名称为Listl的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将其值作为形状控件
在名称为Forml的窗体上添加一个名称为Shapel的形状控件,在属性窗口中将其形状设置为圆形。添加一个名称为Listl的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将其值作为形状控件
admin
2020-04-08
22
问题
在名称为Forml的窗体上添加一个名称为Shapel的形状控件,在属性窗口中将其形状设置为圆形。添加一个名称为Listl的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将其值作为形状控件的填充参数。例如,选择3,则形状控件中被竖线填充,如图所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
【操作步骤】 步骤1:建立界面,将窗体FonM的Caption属性设置为“图形控制”,然后添加相应的控件并设置控件的属性。程序中用到的控件及属性见表4.60。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Listl_Click() Shapel.FillStyle=Listl.Text End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
通过形状控件的Name和Shape属性设置形状控件的名称和形状,通过列表框的Name和List属性设置列表框的名称和列表项,单击列表框中的某一项,通过List]的Text属性确定选中的值,并将其值作为形状控件的填充参数,FilIStvIe属性用于返回/设置一个形状控件的填充样式。
转载请注明原文地址:https://kaotiyun.com/show/nATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是( )。
编写如下程序:PrivateSubCommand1_Click() DimxAsInteger,yAsInteger x=InputBox("输入第一个数") y=InputBox("输入第二个数") Callf(x,
设窗体上有2个框架,每个框架中有若干个单选按钮,下面叙述中正确的是()。
以下关于窗体的叙述中错误的是( )。
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Commandl的命令按钮,要求当执行
下列可以激活属性窗口的操作是()。
有两个关系R与S如下,由关系R和S得到关系T,则所使用的操作为
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimsAsDoubles=0:i=1DoWhilei<6s
随机试题
“让学校的每一面墙壁都开口说话”,这是充分运用了下列哪一种德育方法?()
有些人仅仅在脸上一侧长皮疹,医生怀疑这是由于某些外部接触所引起的。医生发现每个这类病例的皮疹都发生在经常与电话接触的那半边脸上。于是得出结论:这类病例的皮疹是由于与电话接触所引起的。以下除哪项外都能为医生的诊断提供额外的证据?
下列哪项不是中风发病的诱因()
信用证的最后交单日期和装运日期可以是同一天。
植物进行光合作用的原料是()。
【西南大学2010翻译硕士真题】根据下面的文字说明写一篇450字左右的应用文,要求包含标题、正文、结尾语、落款等几个要素。200×年×月×日凌晨3点32分,县公安局110中心接到一女性村民电话报警(号码:135××××××97),说××路×××处发生一起
Nationally,anageingpopulationisaproblem.Butlocallyitcanbeaboon.Theover-50scontrol80%ofBritain’swealth,andl
Priortoage11,childrentendtotelltheirparentswhat’sontheirminds—infact,parentsarefirstonthelist,saysMichael
在三层浏览器/服务器体系结构的数据库应用系统中,触发器是在【2】服务器上执行的。
AscivilwarseruptedthroughouttheRomanRepublicinthe1stcenturyB.C.,countrydwellersmayhavefledtocities.Beforet
最新回复
(
0
)