【简答题】设窗体上有一个名称为 HScroll1 的水平滚动条,要求当滚动块移动位置后,能够在窗体上输出移动的距离 ( 即新位置与原位置的刻度值之差,向右移动为正数,向左移动为负数 ) 。下面是可实现此功能的程序,请填写。 Dim 【 10 】 As Integer Private Sub Form_Load() pos = HScroll1.Value End Sub Private Sub HScrol...
【简答题】设窗体上有一个名称为 HScroll1 的水平滚动条,要求当滚动块移动位置后,能够在窗体上输出移动的距离 ( 即新位置与原位置的刻度值之差,向右移动为正数,向左移动为负数 ) 。下面是可实现此功能的程序,请填写。 Dim 【 】 As Integer Private Sub Form_Load() pos = HScroll1.Value End Sub Private Sub HScroll1_...