主题：[求助]页签打开报错

老师，我想把页签功能也加进去，麻烦看看哪儿有问题。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:导航.rar

老师，为什么左边导航窗口的click事件写到Doubleclick没有效呢？

button按钮不触发doubleclick事件的

click事件模拟双击，参考

static ptime As Date = Nothing
Dim sp As TimeSpan = Date.now - ptime
ptime = Date.now
If sp.TotalMilliseconds < 500  Then
    msgbox("双击了")
End If

具体什么问题？上传实例和截图说明。

以下是引用cd_tdh在2018/8/1 22:39:00的发言：

此主题相关图片如下：screenshot_2018-08-01-22-34-22-517_tim.png

比如:员工管理，页签显示:员工管理，考勤管理，页签显示考勤管理，现在这样编辑代码也不方便。直接调用页签内部函数，后面增加其他代码才方便啊。

1、请先好好理解代码的意思。看懂代码的思路。

2、不知道你到底要做什么，所需要的，微调一下现在的代码便可。