编程技术分享平台

网站首页 > 技术教程 正文

带闪烁提醒功能(带闪烁提醒功能的手表)

xnh888 2024-10-26 16:39:55 技术教程 43 ℃ 0 评论

为了加强提醒功能,可以使用Access窗体的计时器设置标签闪烁,通过标签的闪烁,增强提醒的效果。


代 码

'计时器触发事件,标签闪烁,字体颜色更改
Private Sub Form_Timer()
Me.lab_闪烁.Visible = Not Me.lab_闪烁.Visible
Me.lab_闪烁.ForeColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)

End Sub


演 示


示例下载:http://www.accessoft.com/article-show.asp?id=19961 里下载示例。

Tags:

本文暂时没有评论,来添加一个吧(●'◡'●)

欢迎 发表评论:

最近发表
标签列表