请问Picture容器的问题！急！

Question

我使用了TabStrip控件，在控件上添加了2个Picture控件，但是在显示图片当中出现了问题。
不能正常显示图片内容，请问这是怎么回事？
请看代码，是不是有问题！
Private Sub Form_Resize()
Picture1.BorderStyle = 0
Picture2.BorderStyle = 0
Picture2.AutoSize = TruePicture1.Move RichTextBox1.Left, RichTextBox1.Top, RichTextBox1.Width - HScroll1.Width, RichTextBox1.Height - VScroll1.Height - Cmd1.Height
Picture2.Move 0, 0HScroll1.Value = 0
HScroll1.Top = RichTextBox1.Top + RichTextBox1.Height - Cmd1.Height - HScroll1.Height
HScroll1.Left = RichTextBox1.Left
HScroll1.Width = RichTextBox1.Width - VScroll1.WidthVScroll1.Value = 0
VScroll1.Top = RichTextBox1.Top
VScroll1.Left = RichTextBox1.Left + RichTextBox1.Width - VScroll1.Width
VScroll1.Height = RichTextBox1.Height - Cmd1.Height - HScroll1.HeightHScroll1.Max = Picture2.Width - Picture1.Width
VScroll1.Max = Picture2.Height - Picture1.HeightVScroll1.Visible = Picture1.Height < Picture2.Height
HScroll1.Visible = Picture1.Width < Picture2.Width
End SubPrivate Sub HScroll1_Change()
Picture2.Left = -HScroll1.Value
End SubPrivate Sub VScroll1_Change()
Picture2.Top = -VScroll1.Value
End Sub

Answer 1

具体什么问题，怎么不能正常显示？楼主是想实现图片用scroll bar来调整位置是吧？