[问答题] 新建一个工程，在窗体中创建一个水平滚动条，名称为HS1，Min属性为0，Max属性为200，以及一个命令按钮，名称为“Command1”，标题为“显示位置”。编写一个事件过程，要求程序运行

[问答题] 新建一个工程，在窗体中创建一个水平滚动条，名称为HS1，Min属性为0，Max属性为200，以及一个命令按钮，名称为“Command1”，标题为“显示位置”。编写一个事件过程，要求程序运行后将滚动块移到某个位置后，如果单击“显示”按钮，则在窗体上显示滚动框当前所在位置的值。程序中不得使用任何变量。程序运行结果如图11所示。



注意：存盘时必须存放在考生文件夹下，工程文件名为ylc3.vbp，窗体文件名为ylc3.frm。

参考答案：

(1)Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择水平滚动条控件，在其属性窗口中设置名称为HS1，Min属性为0， Max属性为200。 (3)在工具箱中选择命令按钮控件，将其Caption属性值设置为“显示位置”。双击“显示”按钮弹出代码窗口，添加如下代码： Private Sub Command1_Click() Print VS1.Value End Sub (4)按F5键运行程序。如图11所示。 (5)执行“文件”→“保存工程”命令，将工程文件命名为ylc3.vbp，窗体文件命名为ylc3.frm。

问题解析:

(3)第3小题主要考查了水平滚动条控件的Value属性。