在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性: Max=窗体高度 Min=0 Large

admin2016-06-30  31

问题 在名称为Form1的窗体上画一个垂直滚动条和一个命令按钮,其名称分别为VScroll1和Command1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置垂直滚动条的属性:
    Max=窗体高度
    Min=0
    LargeChange=50
    SmallChange=10
    如果移动垂直滚动条的滚动框,则在窗体上显示滚动框的刻度值。
    程序的运行情况如图所示。
    要求:不得使用任何变量。
    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。

选项

答案步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3。 [*] 步骤2:编写程序代码。 Private Sub Commandl_Click() VScroll1.Max=Form1.Height VScroll1.Min=0 VScroll1.LargeChange=50 VScroll1.SmallChange=10 End Sub Private Sub VScroll1_Change() Print VScroll1.Value End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析 根据题意,在命令按钮的单击事件过程中用代码动态设置垂直滚动条的属性,并且在垂直滚动条的Change事件过程中,用Print方法将垂直滚动条滑块位置的Value属性值输出到窗体上。
转载请注明原文地址:https://jikaoti.com/ti/7uJ0FFFM
0

最新回复(0)