在窗体上添加一个IMage图像框在复制这段代码Private Sub Form_Resize()Image1.Top = 0Image1.Left = 0Image1.Stretch = TrueImage1.Height = Me.ScaleHeightImage1.Width = Me.ScaleWidthImage1.Picture = Me.PictureEnd Sub运行就可以咯~
