重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Vb6只有Label控件可以设置背景透明,VB.net基本上都可以,可以按住CTRL多选,或者用鼠标框选,选中多个控件后,设置它们的backcolor属性为透明,或者用代码:
创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:网站设计、网站建设、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的巴中网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!
For Each ctl As Control In Me.Controls
ctl.BackColor = Color.Transparent
Next
Private Sub Picture1_Paint()
Dim l As Long, t As Long
l = (Picture1.Width - Picture1.ScaleWidth) / 2 '求左右边偏差
t = (Picture1.Height - Picture1.ScaleHeight) / 2 '求上下边偏差
Picture1.PaintPicture Me.Picture, 0, 0, , , Picture1.Left + l, Picture1.Top + t, Picture1.ScaleWidth, Picture1.ScaleHeight '载入图片,就用这行
'Picture1.PaintPicture Me.Image, 0, 0, , , Picture1.Left + l, Picture1.Top + t, Picture1.ScaleWidth, Picture1.ScaleHeight '复制的图片,就用这行
End Sub
用GDI
先建一个6400*4800的Image 类的位图图像 作为GDI画板
然后用Drawimage方法,加载小图像,并按坐标位置画进去
然后保存成文件
我有一个相似功能的VB.net代码,可以给你参考
窗体或picturebox属性里设置双缓冲
timer1刷新频率别太高,移动像素点可以大点
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Label1.BackColor = System.Drawing.Color.Transparent
End Sub
没问题哦。。
下面就介绍一下在VB.NET中可以是图片框透明的两种方法(两种方法的原理都是利用GDI+使图片透明,然后放到背景色为透明色的图片框中实现的) 第一种方法:利用Bitma..