如何给VB的form加滚动条

VB的form有个背景图片属性，我要在画图的过程中
给VB的form背景关联一个背景图片
有的时候背景图片很大，超过了form的最大程度
我想问下，怎么给form添加滚动条，在拖动的时候可以看到整幅的图片
图片的大小不知道
这不是VB.NET，没有autoscroll属性。
希望各位大侠帮帮忙，最好能贴出代码
非常感谢，在线等待

---

要知道图片大小，然后设置滚动条MAXVALUE，在事件里移动，没自动的。

---

引用

要知道图片大小，然后设置滚动条MAXVALUE，在事件里移动，没自动的。

图片的大小是随机的
我也不知道客户要准备多大的图片
因为每个电脑分辨率不一样

---

别用 form 了吧....

---

引用

别用 form 了吧....

不用form那用什么？
能给个如果解决的例子么？

---

通过属性设置的背景图片不能滚动，建议自己用 PaintPicture 进行显示。

---

用PictureBox

---

这个例子用滚动条移动 PictureBox 控件穿过窗体。要试用此例，先把代码粘贴到包含一小的 PictureBox 控件和 HScrollBar 控件的窗体的声明部分，然后按 F5 键，并单击滚动条。

Private Sub Form_Load ()
  HScroll1.Max = 100 ' 设置最大值.
  HScroll1.LargeChange = 20 ' 敲击 5 次后穿过.
  HScroll1.SmallChange = 5 ' 敲击 20 次后穿过.
  Picture1.Left = 0 ' 图形从左边开始.
  Picture1.BackColor = QBColor(3) ' 设置图形框的颜色.
End Sub
Private Sub HScroll1_Change ()
  ' 按照滚动条移动图形.
  Picture1.Left = (HScroll