今天图老师小编要向大家分享个如何用VB在窗体中实现闪烁文字教程,过程简单易学,相信聪明的你一定能轻松get!
【 tulaoshi.com - 编程语言 】
当你在窗体上加入Timer控件时,它只出现在设计时,而不会在运行时出现可见的控件图标。Timer控件带有两个重要的参数。Interval(间隔)属性用来确定Timer控件多久触发一次,其单位为毫秒,因此当该值为500时,就表示一秒钟会触发两次。Enabled(使能)属性用来确定Timer控件是运行(Enabled=True)还是停止(Enabled=False)状态。实际的闪烁是在Timer事件中完成的,Timer控件每次触发,程序都会调用Timer事件。我们可以将Label控件的ForeColor属性设置为黑色(可见)以及和BackColor属性一致的颜色(文字和背景色一致,相当于不可见)。以下代码可以完成检验ForeColor属性的任务:
PrivateSubTimer1_Timer()
IfLabel1.ForeColor=Label1.BackColorThen
Label1.ForeColor=vbBlack
Else
Label1.ForeColor=Label1.BackColor
EndIf
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)EndSub
另外,你也可以让文字采用不同的颜色,比如交替采用红色和绿色:
PrivateSubTimer1_Timer()
IfLabel1.ForeColor=vbRedThen
Label1.ForeColor=vbGreen
Else
Label1.ForeColor=vbRed
EndIf
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)EndSub
当你停止文字闪烁时,还要确定文字的状态是可见的并且采用了合适的色彩。要完成这个功能,你需要在停止闪烁时加入以下代码设置ForeColor属性:
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)Timer1.Enabled=False
Label1.ForeColor=vbBlack
->来源:http://www.tulaoshi.com/n/20160219/1604704.html
看过《如何用VB在窗体中实现闪烁文字》的人还看了以下文章 更多>>