首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为C1、标题为“变宽”的命令按钮,窗体名称为“改变按钮大小”。编写程序,使得单击命令按钮时,命令按钮水平方向的宽度增加100。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为C1、标题为“变宽”的命令按钮,窗体名称为“改变按钮大小”。编写程序,使得单击命令按钮时,命令按钮水平方向的宽度增加100。
admin
2019-05-28
41
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为C1、标题为“变宽”的命令按钮,窗体名称为“改变按钮大小”。编写程序,使得单击命令按钮时,命令按钮水平方向的宽度增加100。程序运行后的窗体如图1-212所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画一个名称Shape1的形状控件,画一个名称为L1的列表框,并在属性窗口中设置列表项的值为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则按照所选的值改变形状控件的形状。例如,选择3,则形状控件被设为圆形,如图1-213所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,如表2-102在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写命令按钮的单击事件过程。 参考代码: Private Sub C1_Click() C1.Width = C1.Width + 100 End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个列表框和一个形状控件,并分别如表2-103设置它们的相关属性。 [*] 步骤3:打开代码编辑窗口,编写列表框的事件过程: 参考代码: Private Sub L1_Click() Shape1.Shape = L1.Text End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/hPUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt3.vbp。其窗体文件上有一个标题为“得分”的框架,在框架中有一个名称为Text1的文本框数组,含6个文本框控件;文本框Text2用来输入难度系数。程序运行时,在左边的6个文本框中输入6个得分,输入难度系数后,单击“计算分
在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vb
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是
为了暂时关闭计时器,应把它的一个属性设置为False。这个属性是
程序运行时,拖动滚动条上的滚动框,则所触发的事件是
数据库设计过程不包括
命令按钮不支持的事件为
随机试题
鲁迅的原名是()
心源性哮喘应首选下列哪一种药物:
红硬,硬结直径6mm,则结核菌素试验反应结果应为()
中国沈阳某进出口公司电告法国某贸易公司,以FOB(2010年《国际贸易术语解释通则》)为条件出售一批服装,信用证付款。广州公司将货物装上“玛丽”号轮船,整批货物分装在三个集装箱中(承运人签发的提单受《海牙规则》调整)。当承运船舶在海上航行时,由于船员疏忽,
专业分包人须在进场前,将其承包范围内的施工组织设计报技术部,由()后方可依照施工。
我国现行的增值税属于消费型增值税。()
根据《国内航空运输承运人赔偿责任限额规定》,对每名旅客随身携带物品的赔偿责任限额为()。
在对象—关系数据库系统中,创建新的基本数据类型需要说明的信息包括______。Ⅰ.类型名Ⅱ.类型的存储信息Ⅲ.类型的地址Ⅳ.类型与ASCII码之间的转换
在具有2n个节点的完全二叉树中,叶子节点个数为()。
AKeepYourVoiceLowAlltheTimeBPutYourselfintheBoss’sPositionCProposeYourSolutionDDon’tGoinWhenYouAre
最新回复
(
0
)