首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上添加两个标签(名称分别为Labell和Label2,标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2,初始文本均为空)和一个命令按钮(名称为Command1,标题为“输入”)。然后编写命令按钮的C
(1)在名称为Form1的窗体上添加两个标签(名称分别为Labell和Label2,标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2,初始文本均为空)和一个命令按钮(名称为Command1,标题为“输入”)。然后编写命令按钮的C
admin
2015-06-30
43
问题
(1)在名称为Form1的窗体上添加两个标签(名称分别为Labell和Label2,标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2,初始文本均为空)和一个命令按钮(名称为Command1,标题为“输入”)。然后编写命令按钮的Click事件过程,程序运行后,如果单击命令按钮,则先后显示两个输入对话框,在两个输人对话框中分别输入身高和体重,并分别在两个文本框中显示出来,运行后的窗体如图所示。要求程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
(2)在名称为Form1的窗体上添加一个图片框(名称为Picture1)、一个垂直滚动条(名称为VScroll1)和一个命令按钮(名称为Command1,标题为“设置属性”),通过属性窗口在图片框中装入一个图形(文件名为pic1,jpg,位于考生文件夹下),图片框的宽度与图形的宽度相同,图片框的高度任意(如图1所示)。编写适当的事件过程。程序运行后,如果单击命令按钮,则设置垂直滚动条的属性如下:
Min 100
Max 2400
LargeChange 200
SmaUChange 20
之后就可以通过移动滚动条上的滚动块来放大或缩小图片框的高度。程序运行后的窗体如图2所示。要求程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:建立界面并设置控件属性。程序中用到的控件及其属性见表3.81和表3.82。 [*] 步骤2:分析并编写程序代码。 参考答案 Private Sub Command1_Click() Text1.Text = InputBox("请输入身高","输入对话框",,100,100) Text2.Text = InputBox("请输入体重","输入对话框",,100,100) End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.83。 [*] 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() VScroll1.Max = 2400 VScroll1.Min = 100 VScroll1.LargeChange = 200 VScroll1.SmallChange = 20 End Sub Private Sub VScroll1_Change() Picture1.Height = VScroll1.Value End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/fwQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下事件过程。PrivateSubCommand1_Click()DimmAsInteger,nAsInteger,pAsIntegerm=3:n
下列程序段的执行结果为m=1n=1SelectCasemCase1SelectCasenCase0
以下Prime过程,用于判断一个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数,就是合数。用被测试的数除以从2开始到该数本身的数,如果能除尽(余数为0),则为合数:如果都除不尽(余数均不为0),则为素数。请在划线处将下面过程补充完整:
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima(5)AsStringFori=1To5a(i)=Chr(Asc("A")+(i-1))
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnum>6
下列哪个是面向对象程序设计不同于其他语言的主要特点?
执行下列语句后,输出结果为______。s$="ABCDEFG"PrintInStr(s$,"efg")PrintLCase$(s$)
以下说法错误的是______。
下列说法不正确的是()。
随机试题
公共政策学诞生于
Stillnotsurewhyyoushouldbelearningaforeignlanguage?Herearesomeverygood【B1】______.First,aforeignlanguagemake
桂枝茯苓丸的主治证病机是
高剂量率后装治疗机是指放射剂量率为
女,48岁,因持续胸痛10小时收入院。查体:血压117/78mmHg,高枕卧位,双肺可闻及较多细湿啰音,啰音范围大于1/2肺野。心电图示:V1~V4导联ST段抬高0.2~0.4mV。该患者的心功能分级是()
A公司总承包某地一扩建项目的机电安装工程,材料和设备由建设单位提供,A公司除自己承担主工艺线设备安装外,非标准件制作安装工程、防腐工程等均匀分包给具有相应施工资质的分包商施工。考虑到该地区风多雨少的气候,建设单位将紧靠河边及施工现场的一所弃用学校提供给A公
建设工程质量责任制的原则包括( )。
不可抗力事故的范围包括由于“自然力量”和“社会力量”引起的各种灾害和意外事故。()
公文的主体部分包括()。
已知甲盒内有大小相同的1个红球和3个黑球,乙盒内有大小相同的2个红球和4个黑球,现从甲、乙两个盒内各任取2个球,则取出的4个球中恰有1个红球的概率是()。
最新回复
(
0
)