UC知道vb中空间关联问题
来源：百度知道 编辑：UC知道 时间：2024/07/02 15:15:53
我想把VScrollBar和PictureBox关联起来，当拖动VScrollBar是将PictureBox中底下的东西显示出来，怎么做？
新建一窗体，添加PictureBox,VScrollBar,HscrollBar,在PictureBox里添加Image图片,使Image的高宽大于PictureBox的高宽，设置Image的Left,Top属性为0。
Private Sub Form_Load()
VScroll1.Max = Image1.Width
VScroll1.SmallChange = VScroll1.Max / 20
HScroll1.Max = Image1.Height
HScroll1.SmallChange = HScroll1.Max / 20
End Sub
Private Sub HScroll1_Change()
Image1.Left = -HScroll1.Value
End Sub
Private Sub VScroll1_Change()
Image1.Top = -VScroll1.Value
End Sub