首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体Forml上画一个名称为Labell、标题为“请选择”的标签控件;再画一个名称为Listl的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个
在窗体Forml上画一个名称为Labell、标题为“请选择”的标签控件;再画一个名称为Listl的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个
admin
2020-04-08
34
问题
在窗体Forml上画一个名称为Labell、标题为“请选择”的标签控件;再画一个名称为Listl的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个名称为Shapel的形状控件。
要求:编写列表框Listl的Click事件过程,使得程序运行时,在列表框中单击不同的列表项时,能将形状控件中的形状设置成列表框中选中的形状,程序运行示意图如图所示。
存盘时,将文件保存至考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbpo
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句(不得使用选择语句或循环语句)。
选项
答案
【操作步骤】 步骤1:新建一个窗体,在窗体上添加一个标签控件,根据表5.7设置控件的Caption属性,结果如图5.7所示。 [*] 步骤2:在窗体上添加一个列表框控件,根据表5.8设置控件的List属性,结果如图5.8所示。 [*] 步骤3:在窗体上添加一个形状控件。 步骤4:双击列表框控件,打开代码窗口,在Listl的Click事件中根据题目要求编写代码(阴影部分是需要填入的内容)。 Private Sub List_Click() [*] 步骤5:调试并运行程序,关闭程序后按题目要求存盘。
解析
新建一个窗体,在窗体上添加一个标签控件,设置标签的Caption属性;再在窗体上添加一个列表框控件和形状控件,设置列表框控件的List属性,然后按题目要求在列表框控件的Click事件中编写代码。
转载请注明原文地址:https://kaotiyun.com/show/4NTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimnumAsIntegerDimkAsInteger,nAsIntegernum=InputBox("请输入一个正整数:")k
A、PrivateSubForm_Click()x=InputBox("输入界面","请输入数据",20)EndSubB、PrivateSubForm_Click()x=InputBox("请输入数据","输
有如下过程:Subproc()DimchAsStringOpen"file1.txt"ForInputAs#1Open"file1_bak.txt"ForOutputAs#2DoWhi
编写如下程序:PrivateSubCommand1_Click() DimxAsInteger,yAsInteger x=InputBox("输入第一个数") y=InputBox("输入第二个数") Callf(x,
以下能够设置控件焦点的方法是( )。
在窗体上画一个名称为CD1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:PrivateSubCommand1_Click()CD1.FileName=""CD1.Filter="所有文件|*.*|(*.
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“
编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=3b=2Ifa*b<10Thenb=b+1Elseb
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()CD1.ShowOpenOpen
随机试题
共同参与构成乳糖操纵子的组分有
患者,男,51岁。1周来牙痛,近1天肿痛明显,伴发热,体温38.9℃,自觉吞咽不畅,查体:口底黏膜水肿,左下颌下皮肤肿胀、质硬,无波动。如处理不当,最可能出现的严重并发症为
下列四条河流中,只流经一个国家境内的是()。
甲为开发一项新型耐高温设备,与某大学的乙、丙教授约定:由甲提供材料、设备、经费、报酬,乙、丙在3个月内完成开发项目,并交付研究成果给甲。为按其完成开发,乙的博士生丁也加入进来,丙负责搜集和翻译最新的英文资料,并负责整理资料和与甲的沟通,项目按期完成并交付技
填料是填料塔的核心,因此填料应符合()。
某企业位于某市市区,为增值税一般纳税人,2014年税务机关对其上一年度纳税情况检查中发现如下问题:(1)所属某仓库多提折旧100000元;(2)7月为本企业基建工程购人材料234000元,其会计处理为:借:在建工程20
甲公司20×3年度取得销售收入4000万元,当年发生的与经营有关的业务招待费支出60万元、广告费和业务宣传费200万元。根据企业所得税法律制度的规定,甲公司在计算当年应纳税所得额时,下列关于业务招待费、广告费和业务宣传费准予扣除数额的表述中,正确的有(
A、B、C、D、E五人共同投资设立了一有限责任公司。2020年3月13日,该五人订立了发起人协议,具体内容如下:该公司注册资本总额为人民币100万元,其中A拟出资20万元人民币,B拟以厂房作价出资20万元,C拟以知识产权作价出资30万元,D、E分别拟以劳务
TrashisthetalkofShanghai.StartingMonday,thecitywillrequireresidentsandbusinessestosorttheirwasteandrecyclabl
Coffee,ahotbeveragefavoredbypeopleindifferentregions,issaidtohavebeen【1】______【1】______inEthiopia.Itwasfound
最新回复
(
0
)