最佳答案:Private Sub Form_Load();Me.Picture = LoadPicture("E:\Users\xjn\Pictures\Lotus.jpg") '自己改图片路径;Me.Aut
Private Sub Form_Load();
Me.Picture = LoadPicture("E:\Users\xjn\Pictures\Lotus.jpg") '自己改图片路径;
Me.AutoRedraw = True;
End Sub;
Private Sub Form_Resize();
Me.PaintPicture Me.Picture, 0, 0, Me.Width, Me.Height;
End Sub。