写在前面
这是PB案例学习笔记系列文章的第7篇,该系列文章适合具有一定PB基础的读者。
通过一个个由浅入深的编程实战案例学习,提高编程技巧,以保证小伙伴们能应付公司的各种开发需求。
文章中设计到的源码,小凡都上传到了gitee代码仓库https://gitee.com/xiezhr/pb-project-example.git

需要源代码的小伙伴们可以自行下载查看,后续文章涉及到的案例代码也都会提交到这个仓库【**pb-project-example**】
如果对小伙伴有所帮助,希望能给一个小星星⭐支持一下小凡。
一、小目标
有时候,我们需要特别醒目(闪烁)的文字来提示用户关注信息时,我们可以借助PB中Timer事件控制StaticEdit,
的Visible属性来实现闪烁特效。

二、Timer事件简介
Timer 函数可以实现在指定时间间隔内反复触发指定窗口的定时事件
① 语法
Timer(interval{,windowname})
② 参数解释
| 参数 |
说明 |
interval |
指定两次触发Timer事件之间的时间间隔,有效值在0~65 之间 如果参数值为0,表示关闭定时器,不在触发窗口的Timer事件 |
windowname |
窗口名,指定时间间隔到时要触发那个窗口的Timer事件 |
三、创建程序基本框架
① 创建examplework 工作区
② 创建exampleapp 应用
③ 新建w_main 窗口,Title 设置为闪烁文字
④ 建立控件
在窗口w_main中添加一个StaticEdit 控件和两个ComandButton 按钮控件。控件分别命名为
st_1、cb_1和cb_2
各个控件属性设置如下
| 控件名称 |
属性 |
值 |
st_1 |
Text |
欢迎关注公众号:XiezhrSpace |
cb_1 |
Text |
开始闪烁 |
cb_2 |
Text |
停止闪烁 |

四、编写代码
① 在窗口w_main的Timer事件中添加如下代码

If Mod(second(Now()),2) = 1 then
st_1.visible = false
else
st_1.visible = True
end if
② 在按钮cb_1的Clicked事件中添加如下代码
timer(0.5)
③ 在按钮cb_2的Clicked事件中添加如下代码
timer(0)
④ 在开发界面左边的System Tree 窗口中双击exampleapp应用对象,在Open事件中添加如下代码
open(w_main)
五、运行程序
