(1)在名称为Form1的窗体上添加两个标签(名称分别为Labell和Label2,标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2,初始文本均为空)和一个命令按钮(名称为Command1,标题为“输入”)。然后编写命令按钮的C

admin2015-06-30  19

问题  (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://jikaoti.com/ti/hP60FFFM
0

最新回复(0)