VB6中，怎么把窗体背景改成规定的图片？？？

来源：百度知道 编辑：UC知道 时间：2024/05/16 14:41:19
有没有不要加入代码的改法？

把窗体的 AutoRedraw 设为true，然后加入以下代码：

Dim a As Object

Private Sub Form_Load()
Call Controls.Add("VB.PictureBox", "pic")
Set Me.Controls("pic").Picture = LoadPicture("c:\test.jpg")
End Sub

Private Sub Form_Resize()
Form1.PaintPicture Me.Controls("pic").Picture, 0, 0, Form1.ScaleWidth, Form1.ScaleHeight, 0, 0, , , vbSrcCopy
End Sub

有。直接把 Form 的Picture 属性改为你要的图片就可以了。不过这样的背景不会随窗口的变化改变大小的

简单的用loadpictuer语句．用loadpictuer语句可以指定不同的窗体背景图片．例如星期一到星期日或1号到31号，可以给人一种每日不同的感觉．