Question

急！！！vb在窗体form1的picture属性中设置的图片如何自动适应窗体大小

vb在窗体form1中我将windowstate设置为max后
在窗体form1的picture属性中设置的图片
但是该图片无法填满form1
请教如何可以使该图片填满form1
急！！！！

Answer 1

代码如下。
========================
Dim p As Picture
Private Sub Form_Load()
Set p = Icon 'Icon处写上你自己的图片
Picture = p
End Sub

Private Sub Form_Resize()
Set Picture = Nothing
PaintPicture p, 0, 0, Width, Height
End Sub

Answer 2

Private Sub Form_Load()
Picture1.Top = 0
Picture1.Left = 0
End Sub

Private Sub Form_Resize()
Picture1.Height = Me.Height
Picture1.Width = Me.Width
End Sub