| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 求助，消息提醒 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=151161) |
| -- 作者：王万金123 -- 发布时间：2020/6/16 20:45:00 -- 求助，消息提醒 比照帮助里做了消息提醒功能，动态显示多少条未读消息实现了。单闪烁效果未实现，求帮助 |
| -- 作者：王万金123 -- 发布时间：2020/6/16 20:46:00 -- 闪烁的代码执行了的，就是不改变颜色 |
| -- 作者：有点蓝 -- 发布时间：2020/6/16 20:47:00 -- 贴出代码，或者上传实例说明问题 |
| -- 作者：王万金123 -- 发布时间：2020/6/16 20:49:00 -- \'OpenQQ闪烁 Static OpenQQ As RibbonMenu.Button Static LastTime As Date If OpenQQ Is Nothing Then OpenQQ = ConfigBar.Items("OpenQQ") End If Dim txt As String If QQClient.Ready If QQClient.UnreadCount > 0 Then txt = "(" & QQClient.UnreadCount & "条)" End If End If If OpenQQ.Text <> txt Then OpenQQ.Text = txt End If If OpenQQ.Text > "" Then Dim ntp As timeSpan = Date.Now - LastTime If ntp.TotalSeconds >= 0.5 Then LastTime = Date.Now If OpenQQ.ForeColor = Color.Red Then OpenQQ.ForeColor = Color.Transparent Else OpenQQ.ForeColor = Color.Red End If End If End If |
| -- 作者：王万金123 -- 发布时间：2020/6/16 20:49:00 -- 跟帮助里一样的 |
| -- 作者：王万金123 -- 发布时间：2020/6/16 20:59:00 -- 老师能帮忙看下是什么问题不？ |
| -- 作者：有点蓝 -- 发布时间：2020/6/16 21:55:00 -- 代码放在那里的？ 在菜单的SystemIdle事件增加以下代码：
|
| -- 作者：王万金123 -- 发布时间：2020/6/16 21:56:00 -- 代码是放在菜单的SystemIdle事件中的老师 |
| -- 作者：王万金123 -- 发布时间：2020/6/16 21:58:00 -- 直接在命令窗口中写入 ConfigBar.Items("wclxx").ForeColor = Color.Red XCLXX标签也不会变成红色 [此贴子已经被作者于2020/6/16 21:59:19编辑过]
|
| -- 作者：王万金123 -- 发布时间：2020/6/16 22:10:00 -- 老师请问下除了ForeColor属性能实现闪烁功能外，还有其他属性能实现吗？ |