题目内容：
设窗体上有一个名称为Hscroll1的水平滚动条，要求当滚动块移动位置后，能够在窗体上输出移动的距离即(新位置与原位置的刻度值之差，向右移动为正数，向左移动为负数)。下面是可实现此功能的程序，请填空。Dim 【1】 As Integer
Private Sub Form_Load()
pos=HScroll 1.Value
End Sub
Private Sub HS.cr0.11 1_Change()
Print 【2】 -pos
pos=HScroll 1.Value
End Sub
参考答案：
答案解析：