Question

VB6.0在窗体里面加的背景图片很大的时候,如何让图片去根据窗体的大小来显示?

编程过程中，要加的背景图片过大时，当窗体最大化显示的时候也还无法把图片完整的显示出来，只显示了原来图片的一部分出来，此时已无法让窗体去适应图片大小了吧！怎样在程序运行过程中，让图片改变大小来适应窗体的大小而使得图片能在窗体里面完整的显示出来呢？？？？

Answer 1

Dim p As Picture

Private Sub Form_Load()
Me.AutoRedraw = True
Set p = LoadPicture("C:\songhuiqiao1.jpg") '换成你自己的图片
End Sub

Private Sub Form_Resize()
PaintPicture p, 0, 0, Width, Height
End Sub