![](https://iknow-base.cdn.bcebos.com/lxb/notice.png)
VB如何设置窗体背景图片随窗体大小自动调整?
3个回答
展开全部
Private Sub Form_Load();
Me.Picture = LoadPicture("E:\Users\xjn\Pictures\Lotus.jpg") '自己改图片路径;
Me.AutoRedraw = True;
End Sub;
Private Sub Form_Resize();
Me.PaintPicture Me.Picture, 0, 0, Me.Width, Me.Height;
End Sub。
延展回答:
VB表格打印控件:自动识别并支持ADO和DAO两种数据库链接,也可以不链接数据库.(可以链接数据控件,也可以链接数据对象dao/ado).支持合并单元格、对齐、支持单元格斜线、支持多种单元格格式,可自动设置行高列宽.支持表格导出到word。
“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置,而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言,是一种在计算技术发展历史上应用得最为广泛的语言。
展开全部
Private Sub Form_Load()
Me.Picture = LoadPicture("E:\Users\xjn\Pictures\Lotus.jpg") '自己改图片路径
Me.AutoRedraw = True
End Sub
Private Sub Form_Resize()
Me.PaintPicture Me.Picture, 0, 0, Me.Width, Me.Height
End Sub
Me.Picture = LoadPicture("E:\Users\xjn\Pictures\Lotus.jpg") '自己改图片路径
Me.AutoRedraw = True
End Sub
Private Sub Form_Resize()
Me.PaintPicture Me.Picture, 0, 0, Me.Width, Me.Height
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
'图片用Image1控件
Private Sub Form_Resize()
Image1.Width = Me.Width
Image1.Height = me.Height
End Sub
Private Sub Form_Resize()
Image1.Width = Me.Width
Image1.Height = me.Height
End Sub
追问
我不想使用控件,就窗体背景图片
追答
'图片自己随便加
Private Sub Form_Resize()
Me.PaintPicture Me.Picture, 0, 0, Me.Width, Me.Height
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询