VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)
首页 - 经验之谈 - 如何使Form的背景图随Form大小改变
发表评论(0)作者:, 平台:, 阅读:13908, 日期:2000-03-29


如何使Form的背景图随Form大小改变


来源: Jaric, cww


: 我在表单的 picture 属性设好一个图, 成为表单的背景图,

: 但是当表单的大小拉大, 超过图案大小时, 就露出难看的空白,

: 请问如何设定, 才能让背景图随表单的大小而 stretch (伸展开来) 呢 ?


单纯显示图形用Image即可,而且用Image也正好可解决你的问题

设定Image的Stretch=true

在加入以下的code

Private Sub Form_Resize()

Image1.Move 0, 0, ScaleWidth, ScaleHeight

End Sub


或者使用以下的方式来做也可以


Private Sub Form_Paint()

Me.PaintPicture Me.Picture, 0, 0, ScaleWidth, ScaleHeight

End Sub