vb点虐 lable的简单介绍

vb点虐 中如何使背景图片上的lable控件透明?

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

创新互联建站是专业的洋县网站建设公司,洋县接单;提供网站制作、成都网站设计,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行洋县网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

Me.Label1.BackColor = System.Drawing.Color.Transparent

End Sub

没问题哦。。

vb点虐 通过线程给lable.text赋值问题

为了线程安全,微软规定线程不能直接访问窗体控件,需要用委托的方式,窗体代码中增加:

Delegate Sub SetTextDelegate(txt As String)

Private Sub SetText(ByVal Result As String)

If Me.lblTime.InvokeRequired Then

Dim d As New SetTextDelegate(AddressOf SetText)

Me.Invoke(d, New Object() {Result})

Else

Me.lblTime.Text = Result

End If

End Sub

然后在线程中需要更改lblTime时,用:

SetText("当前时间:" System.DateTime.Now)

vb点虐 中如何实现将label背景变透明,但字体显示出来

1、将窗口的TransparencyKey属性设置成某一种颜色(在显示时,这种颜色会显示为透明),如:

Me.TransparencyKey = System.Drawing.Color.Red(可在属性窗口中指定或通过代码设置)

2、将Label的BackColor属性设置为与窗口的TransparencyKey属性相同的颜色,如:

Me.label1.BackColor = System.Drawing.Color.Red(可在属性窗口中指定或通过代码设置)

Me.label1.BackColor = Me.TransparencyKey(只能通过代码设置)

3、将Label的ForeColor属性设置为与窗口的TransparencyKey属性不相的颜色,如:

Me.label1.ForeColor = System.Drawing.Color.Blue(可在属性窗口中指定或通过代码设置)


网页标题:vb点虐 lable的简单介绍
网页路径:http://scyanting.com/article/ddiphjo.html