以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  导航任务控件如何与某窗口相连?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127344)

--  作者:动检
--  发布时间:2018/11/12 11:30:00
--  导航任务控件如何与某窗口相连?
点击任务栏中某任务 就会自动出现某窗口的代码如何写?使任务与某一窗口建立连接关系



Select Case e.Link.Text

    Case "分布统计"

        Forms("导航").Open()

        WinForm = Forms("分布统计")

End Select


这样写出来提示代码错误 请问要如何修改


--  作者:有点甜
--  发布时间:2018/11/12 12:04:00
--  

1、提示什么错误?

 

2、试试改成

 

Select Case e.Link.Text
    Case "分布统计"
        Forms("导航").Open()
        Forms("分布统计").show
End Select


--  作者:动检
--  发布时间:2018/11/12 14:27:00
--  
已经照着你的改了 这次可以了 谢谢有点甜