高分，在线等，图片居中的问题

Question

如何将一张图片导到picture控件的中间呢？

Answer 1

也可以用一个Image控件来做，把它的Stretch属性设置为True,调整它在Picture的中间就行了

Answer 2

Image控件放Picture上
Private Sub Command1_Click()
    Image1.Picture="c:\test.jpg"
    Image1.Move (Picture1.Width - Image1.Width) / 2, (Picture1.Height - Image1.Height) / 2
End Sub