请教：背景如何自动缩放的问题

窗体的背景图要跟着窗体大小改变的话 要用的GDI+ VB本身是不提供的 但可以变通一下 VB的image控件可以让图形跟着控件的大小改变而改变 你可以添加一个image控件和窗体一样大 然后把stretch属性设置成真

加个image控件，strenth(可能不是这样写，s开头，具体忘了，就是自动适应)属性设置为true
在form resize事件里写
image1.width=me.width-100
image1.height=me.height-400

'　前不久我回复过这个问题：
'　在窗体刚创建时，就在窗体中放一个图片控件【Image1】；
'　【Image1.Stretch】属性手工设置成【True】；
'　【Image1.Picture】属性中浏览放入一张预先准备好的图片；
'　【Image1】的大小和位置可以随意，不影响其他控件即可。
'　输入以下代码
Option Explicit
Private Sub Form_Load() '　窗体初始化程序
Image1.Left = 0 : Image1.Top = 0
'　…………
End Sub
Private Sub Form_Resize() '　控件随动程序
On Error Resume Next
Dim n1 As Long, n2 As Long
'　窗体最小尺寸【800像素×450像素】控制
n1 = Me.Width: n2 = Me.Height
n1 = IIf(n1 < 12000, 12000, n1)
n2 = IIf(n2 < 6750, 6750, n2)
Me.Width = n1: Me.Height = n2
n1 = Me.ScaleWidth '　n1 = 11760
n2 = Me.ScaleHeight '　n2 = 6180
'　窗体其他控件的大小和位置
Image1.Width = n1 : Image1.Height = n2
'　…………
End Sub