如何把一个图片完全适合一个窗体背景（picture属性），就象完全适合一个image控件一样（但不想用image控件）。

Question

我把一个800X600的图片作为背景，当屏幕区域变大时，它就会有空出的地方！
如何把一个图片完全适合一个窗体背景（picture属性），就象完全适合一个image控件一样。
或者说能求得当前屏幕区域的大小设置，跟据不同的设置把事先准备好的大小不同的图片作背景。最好能用第一种方法实现。

Answer 1

Private Sub Form_Load()
 Me.AutoRedraw = True
 Image1.Visible = False
End SubPrivate Sub Form_Resize()
  Me.PaintPicture Image1.Picture, 0, 0, Me.ScaleWidth, Me.ScaleHeight
End Sub