在名称为Form1的窗体上添加一个命令按钮和一个水平滚动条,其名称分别为Command1和HScroll1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求没置水平滚动条的属性:
Max=窗体宽度
Min=0
LargeChange=50
SmallChange=10
而如果移动水平滚动条的滚动框,则滚动框的位置值显示在窗体上。程序的运行情况如图所示。
要求:不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjf2.vbp,窗体文件名保存为sjt2.frm。
参考答案:[解题思路] 本题主要考查控件的画法、水平滚动条(HScrollBar)相关属性的设置以及命令按钮简单事件编程的掌握情况。
滚动条的Max、Min属性限定了滚动条所能表示的最大值和最小值,即Value属性值的取值范围。LargeChange属性用于设置当单击滚动条滑块与两侧箭头间区域时Value属性值的改变量,SmallChange属性用于设置当单击滚动条两侧箭头时Value属性值的改变量。滚动条滑块位置改变时触发其Change事件。在窗体上输出内容使用Print方法。
[操作步骤]
步骤1:按照题目要求建立窗体和控件,并设置控件的属性。程序中用到的控件及属性见表2。
步骤2:编写程序代码。 表 2 控件 水平滚动条 命令按钮 属性 Name Name Caption 设置值 HScroll1 Command1 Command1
参考答案:
Private Sub Command1_Click( )
HScroll1. Max = Form1. Width
HScroll1. Min = 0
HScroll1. LargeChange = 50
HScroll1. SmallChange = 10
End Sub
Private Sub HScroll1_Change( )
Print HScroll1. Value
End Sub
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
答案考生文件夹