如何用VB在窗体中实现闪烁文字
2018-06-17 17:16:09来源:未知 阅读 ()
实际的闪烁是在Timer事件中完成的,Timer控件每次触发,程序都会调用Timer事件。我们可以将Label控件的ForeColor属性设置为黑色(可见)以及和BackColor属性一致的颜色(文字和背景色一致,相当于不可见)。以下代码可以完成检验ForeColor属性的任务:
PrivateSubTimer1_Timer()
IfLabel1.ForeColor=Label1.BackColorThen
Label1.ForeColor=vbBlack
Else
Label1.ForeColor=Label1.BackColor
EndIf
EndSub
另外,你也可以让文字采用不同的颜色,比如交替采用红色和绿色:
PrivateSubTimer1_Timer()
IfLabel1.ForeColor=vbRedThen
Label1.ForeColor=vbGreen
Else
Label1.ForeColor=vbRed
EndIf
EndSub
当你停止文字闪烁时,还要确定文字的状态是可见的并且采用了合适的色彩。要完成这个功能,你需要在停止闪烁时加入以下代码设置ForeColor属性:
Timer1.Enabled=False
Label1.ForeColor=vbBlack
->标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
上一篇:VB VC混合编程疑难问题解
下一篇:集合类:VBA集合对象的安全包装
- VB游戏写作技巧(2)网络篇 2018-06-17
- 如何用TextBox打开和保存文件 2018-06-17
- VB常见问题解答(1) 2018-06-17
- 如何用API定义程序热键 2018-06-17
- 如何用VB访问外来数据库 2018-06-17
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash