【正确答案】第一步:启动Visual Basic,新建一个工程文件。
第二步:在窗体上画出一个水平滚动条,并将它的属性按试题要求进行设置。
第三步:编写程序源代码:
1 Prirate Sub HScroll1 Change( )
2 Label1.Left=Me.HScroll1
3 End Sub
4
5 Private Sub HScroll1_Scroll( )
6 Label1.Left = Form1
HScroll1
7 End Sub
第四步:调试并运行程序,运行正确后保存。程序设计完成经调试无误后进行存盘。以Stj2.vbp和sjt2.frm进行保存。
【答案解析】[解析]
首先按试题要求在窗体上画出一个水平滚动条,并将它的属性按试题要求进行设置。当单击滚动条时,系统会触发Change事件,只要将HScroll1.Value赋值给Label1.left就能满足试题的要求。