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

其他：'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 窗体上一个Image1 把stretch 属性改为true
加载你想要加 的图片。
在窗体的Resize事件里写以下代码
Private Sub Form_Resize()
Image1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight
End Sub

上一个：VB 按钮 Command 如何改变上边文字的颜色？
下一个：控件被过程调戏用时，焦点在那。