Private Sub Form_Paint()
Me.PaintPicture Me.Picture, 0, 0, Form1.Width, Form1.Height
End Sub
Private Sub Form_Resize()
Me.PaintPicture Me.Picture, 0, 0, Form1.Width, Form1.Height
End Sub
只第一个过程时,在标准窗体与最大化窗体变化时会只有部分背景出现,加上最后一个过程就完美了。
Private Sub Form_Paint()
Me.PaintPicture Me.Picture, 0, 0, Form1.Width, Form1.Height
End Sub
Private Sub Form_Resize()
Me.PaintPicture Me.Picture, 0, 0, Form1.Width, Form1.Height
End Sub
只第一个过程时,在标准窗体与最大化窗体变化时会只有部分背景出现,加上最后一个过程就完美了。