- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 817事务日历改进-多个日历 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72026)
-- 发布时间：2015/7/22 14:16:00
-- 817事务日历改进-多个日历
在项目中使用逛逛老师的817改进的事务日历（http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=56011&replyID=&skin=1）做了一个“日程”，现又想做一个“会议日程”，试了一下：新建一个“事务主表2”，增加全局代码，在复制之前的全局代码，然后修改（定义事务主表2），报错说代码重复，该如何操作？谢谢 |
-- 发布时间：2015/7/22 15:01:00
--
定义的变量名称不要一样啊
-- 发布时间：2015/7/22 15:35:00
--
没事不要乱改，要改先看懂代码啊。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:我的日历20140827.rar |
-- 发布时间：2015/7/29 10:51:00
--
能在日历中事务标签上实现弹出气泡吗？即，鼠标移动到某一事务标签上，会弹出气泡（提示信息），这个功能很实用，谢谢！~
-- 发布时间：2015/7/29 11:38:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:我的日历20140827.zip |
-- 发布时间：2015/7/29 13:29:00
--
麻烦问问，气泡的代码写在哪儿？需学习消化一下，谢谢！
-- 发布时间：2015/7/29 14:12:00
--
全局代码， MouseHover 事件
-- 发布时间：2015/7/29 16:18:00
--
谢谢。发现一个问题，刚进入日历时，气泡出现和停留时间正常。如果后退1个月后（比如到6月），则气泡只能闪现即消失，麻烦看看。
-- 发布时间：2015/7/29 16:37:00
--
留意红色代码
Private Sub My_日历标签_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseEnter, pl.MouseEnter
Me.pl.ForeColor = Color.Red
Dim str As String = _主表dr(n主题) & vbCrLf & _主表dr(n内容)
zxbToolTip.SetToolTip(sender, str)
End Sub
-- 发布时间：2015/7/29 22:16:00
--
测试过了，会出现如下报错：
此主题相关图片如下：搜狗截图15年07月29日2206_2.jpg
顺便问问，能设置气泡停留时间吗？谢谢