Question

VB窗体的背景图充满整个窗体，怎样设置？

Answer 1

'1、设置BorderStyle属性设置为“0-None”
'2、使用
网海1书生
上面说的代码
如果做封面的话，还需要在窗体上放一个Timer
'1、设置BorderStyle属性设置为“0-None”
'2、窗体上放一个Timer，默认名称为Timer1'
Private
Sub
Form_Click()
Form2.Show
End
Sub
Private
Sub
Form_Load()
Me.AutoRedraw
=
True
Timer1.Interval
=
3000
Timer1.Enabled
=
True
End
Sub
Private
Sub
Form_Paint()
Timer1.Enabled
=
False
End
Sub
Private
Sub
Form_Resize()
Me.PaintPicture
Me.Picture,
0,
0,
Me.ScaleWidth,
Me.ScaleHeight
End
Sub
Private
Sub
Timer1_Timer()
Timer1.Enabled
=
False
Unload
Me
Form2.Show
End
Sub

Answer 2

窗体上一个Image1
把stretch
属性改为true
加载你想要加
的图片。
在窗体的Resize事件里写以下代码
Private
Sub
Form_Resize()
Image1.Move
0,
0,
Me.ScaleWidth,
Me.ScaleHeight
End
Sub