问题
问答题
在名称为Form1的窗体上建立一个水平滚动条,名称为HS1,其最大值为100,最小值为0。要求程序运行后,每次移动滚动框时,都执行语句Form1.Print HS1.Value,如图11-14所示(程序中不能使用任何变量)。
注意:保存时必须存放在考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
答案
参考答案:滚动条表示的最大值由Max属性设置,最小值由Min属性设置,滚动条的当前值由Value属性设置;当滚动框的位置改变时,触发Change事件。清除窗体上原来的显示的值可以用Cls方法来实现。解题步骤如下。
(1)建立界面并设置控件属性。本程序中用到1个滚动框,将其名称即Name属性设置为:HSl,Min和Max属性属性分别设置为0和100。
(2)编写程序代码。
参考代码:
Private Sub HSl_Change()
Cls
Form1.Print HSl
End Sub
(3)调试并运行程序。
(4)按题目要求存艋。
在窗体上建立好控件后,先设置控件属性,再编写事件过程。