我想问一下如何设置那个VB的背景图

[zhangbai1000]

我想问一下，就是我想给程序添加一个背景图，但是这个背景图却不能全屏显示，应该怎么做啊？我用窗体那个picture不能全屏显示，而用imange控件时又不能设为背景，请问我应该怎么做？

[贝隆]

使用BitBlt函数绘制到指定的区域

[lyserver]

使用PaintPicture ，比如：

Option Explicit

Private Sub Form_Resize()
    Me.ScaleMode = vbPixels
    Me.AutoRedraw = True
    Me.PaintPicture LoadPicture("d:\2.gif"), 0, 0, Me.ScaleWidth, Me.ScaleHeight
    Me.AutoRedraw = False
End Sub

[zhangbai1000]

可以说的详细些吗？我不是很懂

[zhangbai1000]

[Quote=引用 2 楼 lyserver 的回复:]
使用PaintPicture ，比如：

VB code

Option Explicit

Private Sub Form_Resize()
Me.ScaleMode = vbPixels
Me.AutoRedraw = True
Me.PaintPicture LoadPicture("d:\2.gif"), 0, 0, Me.ScaleWidth,……
[/Quote]
谢啦！呵呵