首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体Forml上画一个名称为Labell、标题为“请选择”的标签控件;再画一个名称为Listl的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个
在窗体Forml上画一个名称为Labell、标题为“请选择”的标签控件;再画一个名称为Listl的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个
admin
2020-04-08
62
问题
在窗体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全国计算机二级
相关试题推荐
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1Click() Dima&,s&,k& s=1 a=2 Fork=2To10
下面程序运行时,若输入395,则输出结果是( )。PrivateSubCommand1_Click() Dimx% x=InputBox("请输入一个3位整数") PrintxMod10,x\100,(xMod100)\
窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click()Dimn%,
编写如下程序: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
有两个关系R与S如下,由关系R和S得到关系T,则所使用的操作为
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是()。
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为“打开文件”的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()CD1.ShowOpenOpen
随机试题
A.左心房增大B.右心室肥大C.右心房、室增大D.左、右心室增大E.左、右心房增大室间隔缺损心腔变化为
A、β1受体B、β2受体C、M受体D、N1受体E、N2受体骨骼肌细胞膜上的受体是( )。
患儿,女,早产儿,胎龄32周,出生后6天。近3日患儿哭声减弱,活动减少。拒乳,反应低下。查体:体温29℃。双面颊、肩部、臀部、下腹部、大腿及小腿外侧皮肤发硬,硬肿范围大于60%,按之如橡皮样。诊断为重度新生儿寒冷损伤综合征。恢复正常体温需要的时间是
对产生超广谱β-内酰胺酶的细菌感染的患者进行治疗时,宜首选()。
某工程的空调系统设计的工作压力为1000Pa,其风管系统应按()风管制作和安装的要求施工。
下列会计事项中,属于会计政策变更的是()。
下列哪一项是语文课程评价的根本目的()。
某校校车停靠点设置在铁路道口附近,很多学生在等车时,经常有向列车扔杂物、向火车道扔石子的行为,甚至有的学生攀爬铁路护栏。假如你是铁路沿线派出所的民警.你会怎么做?
美西战争
下列选项中,(28)不属于Windows的网络应用程序接口(API)。
最新回复
(
0
)