在名称为Form1的窗体上添加一个文本框(名称为Text1)和一个水平滚动条(名称为HScroll1),如图1所示。在属性窗口中对滚动设置如下属性:
Min | 500 |
Max | 2000 |
LargeChange | 50 |
SmallChange | 20 |
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2. frm
参考答案:[解题思路] 通过调整滚动条滑块的位置即可改变其Value属性的值,滚动条的Max和Min属性为滚动条所能表示的最大值和最小值,LargeChange属性用于设置当单击滑块与两侧箭头间区域时Value属性值的改变量,SmallChange属性用于设置当单击滚动条两侧箭头时Value属性值的改变量。当改变滚动条滑块位置后将触发其Change事件。
文本框的高度和宽度分别由其Height属性值和Width属性值设定。
[操作步骤]
步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表1。
步骤2:编写程序代码。 表1 控件 文本框 水平滚动条 属性 Name Name Max Min Large
ChangeSmall
Change 设置值 Text1 HScroll1 2000 500 50 20
参考答案:
Private Sub HScroll1_Change()
Text1. Height = HScroll1. Value
Text1. Width = 1.2 * Text1. Height
End Sub
步骤3:调试并运行程序,关闭程序后按题目要求存盘,