首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体Form1上画一个名称为Label1、标题为“请选择”的标签控件;再画一个名称为List1的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个
在窗体Form1上画一个名称为Label1、标题为“请选择”的标签控件;再画一个名称为List1的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个
admin
2020-08-10
28
问题
在窗体Form1上画一个名称为Label1、标题为“请选择”的标签控件;再画一个名称为List1的列表框控件,通过设置有关属性向其中依次加入“矩形”、“正方形”、“椭圆形”、“圆形”、“四角圆化的矩形”、“四角圆化的正方形”共6个列表项;最后在窗体上画1个名称为Shape1的形状控件。
要求:编写列表框List1的Click事件过程,使得程序运行时,在列表框中单击不同的列表项时,能将形状控件中的形状设置成列表框中选中的形状,程序运行示意图如图所示。
存盘时,将文件保存至考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句(不得使用选择语句或循环语句)。
选项
答案
新建一个窗体,在窗体上添加一个标签控件,设置标签的Caption属性;再在窗体上添加一个列表框控件和形状控件,设置列表框控件的List属性,然后按题目要求在列表框控件的Click事件中编写代码。 步骤1:新建一个窗体,在窗体上添加一个标签控件,根据表3设置控件的Caption属性。 [*] 步骤2:在窗体上添加一个列表控件,根据表4设置控件的List属性。 [*] 步骤3:在窗体上添加一个形状控件。 步骤4:双击列表框控件,打开代码窗口,在List1的Click事件中根据题目要求编写代码。 Private Sub List1_CIick( ) If List1.ListIndex=0 Then Shape1.Shape=0 Elself List1.ListIndex=1 Then Shape1.Shape=1 Elself List1.ListIndex=2 Then Shape1.Shape=2 Elself List1.ListIndex=3 Then Shape1.Shape=3 Elself List1.ListIndex=4 Then Shape1.Shape=4 Elself List1.ListIndex=5 Then Shape1.Shape=5 End Sub 步骤5:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/qqHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在利用菜单编辑器设计菜单时,为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键,可以将该菜单项的标题设置为
以下可以判断是否在文本框(名称为Text1)内按下了回车键的事件过程是()。
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是
为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是
以下叙述中错误的是
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:PrivateSub
产生100以内(不含100)2位随机整数的VisualBasic表达式是
在考生文件夹下有一个工程文件sjt5.vbp,界面如图2-137所示,其功能如下:①单击”读数据”按钮,则把考生文件夹下文件in5.dat中的12组整数(其中每组含有10个数,共计120个整数)读到数组a中;②单击”计算”按钮,则对每组数求平均值,并将
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动”按钮,则将数组a中的最大值移动到数组的最前面,其他
软件测试的目的是
随机试题
下列属于递延资产获取费的是()
在行政诉讼过程中,下列行为中人民法院须征得原告同意才能实施的是()。
甲化工厂和乙造纸厂坐落在一条小河的两岸。化工厂生产中排放三氯化铁残液,造纸厂生产中排放漂液废水,两厂排污浓度均不超过国家规定的排放标准。在河水水位正常情况下,两个工厂排污均不会对河水造成污染。2013年5月该地大旱,河水明显减少,化工厂排放的废水冲入造纸厂
患儿,男,9岁。发热伴流涕3天,咽部充血,肌肉酸痛,胸闷,心率54次/分,实验室检查CK—MB144U/L。心电图:窦性心动过缓,I度房室传导阻滞。该患儿所患疾病的主要病理变化是
牡螈散的功用是四神丸的功用是
女,30岁。劳累后心悸、气短5年,心浊音界在胸骨左缘第3肋间向左扩大。心尖部局限性舒张期隆隆样杂音,第一心音亢进。肝脏不肿大,下肢无水肿。预防本病的关键在于
王二与周三之间订立买卖合同,王二卖给周三钢材5万吨,周三转手将这些钢材卖给了吴某,吴某接到钢材后,发现该财产有严重质量问题,遂向人民法院起诉。经查,王二和周三的买卖合同中有一个仲裁条款:若因该合同发生争议,提交甲市仲裁委员会仲裁。则本案中王二的诉讼地位可能
我国目前的会计监督体系为()。
企业用于生产某种产品的、已确认为无形资产的非专利技术,其摊销金额应计入当期管理费用。()(2014年)
一张原始凭证所列的支出需要由两个以上的单位共同负担时,应当由保存该原始凭证的单位将复制件提供给其他应负担单位。()
最新回复
(
0
)