股份报价转让是指投资者委托证券公司，为其转让中关村科技园区已退市股份有限公司股份进行代理报价、成交确认和股份过户的股份转让方式。（）

设窗体上有一个名称为HScroIII的水平滚动条，要求当滚动块移动位置后，能够在窗体上输出移动的距离(即新位置与原位置的刻度值之差，向右移动为正数，向左移动为负数)。下面是可实现此功能的程序，请填写。
Dim______As Integer
Private Sub Form_Load()
pos=HScroIII.Value
End Sub
Private Sub HScroIII_Change()
Print______-pos
pos=HScroIII.Value
End Sub