以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]页签打开报错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=122655)

--  作者:cd_tdh
--  发布时间:2018/7/30 16:39:00
--  [求助]页签打开报错

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

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:导航.rar


--  作者:有点甜
--  发布时间:2018/7/30 17:51:00
--  

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:导航.rar


 


--  作者:cd_tdh
--  发布时间:2018/7/31 9:00:00
--  

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

 


图片点击可在新窗口打开查看此主题相关图片如下:222.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2018/7/31 9:34:00
--  

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 16:11:00
--  
老师,打开页签页签名字是窗口名,怎么把控件名传递过去为页签名。
--  作者:有点甜
--  发布时间:2018/8/1 17:06:00
--  

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:导航 (1).rar


 


--  作者:cd_tdh
--  发布时间:2018/8/1 21:06:00
--  
效果不好,参数过来了,我在调试试试。
[此贴子已经被作者于2018/8/1 21:07:20编辑过]

--  作者:有点甜
--  发布时间:2018/8/1 21:39:00
--  
以下是引用cd_tdh在2018/8/1 21:06:00的发言:
效果不好,参数过来了,我在调试试试。
[此贴子已经被作者于2018/8/1 21:07:20编辑过]

 

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


--  作者:cd_tdh
--  发布时间:2018/8/1 22:39:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:screenshot_2018-08-01-22-34-22-517_tim.png
图片点击可在新窗口打开查看


比如:员工管理,页签显示:员工管理,考勤管理,页签显示考勤管理,现在这样编辑代码也不方便。直接调用页签内部函数,后面增加其他代码才方便啊,比如:
Functions.Execute("增加页签")
Forms(“员工管理”).open()
 
[此贴子已经被作者于2018/8/1 22:45:55编辑过]

--  作者:有点甜
--  发布时间:2018/8/1 22:44:00
--  
以下是引用cd_tdh在2018/8/1 22:39:00的发言:

图片点击可在新窗口打开查看此主题相关图片如下:screenshot_2018-08-01-22-34-22-517_tim.png


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

 

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

 

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