以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  导航栏收缩问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=135432)

--  作者:ZJZK2018
--  发布时间:2019/5/26 16:53:00
--  导航栏收缩问题
打开窗口时,导航栏不显示导航栏的页面,只显示导航栏按钮,点击按钮时显示页面,如何操作?


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20190526164828.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2019/5/26 17:27:44编辑过]

--  作者:有点甜
--  发布时间:2019/5/26 19:49:00
--  

只能变通处理,

 

你可以做一个额外的页签,显示空白吧?

 

 


--  作者:ZJZK2018
--  发布时间:2019/5/29 18:21:00
--  
老师:
有没有办法点击下图中任何一个按钮时,动态加载所需要的表?如何写代码?写在哪里?

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

[此贴子已经被作者于2019/5/29 18:22:22编辑过]

--  作者:有点甜
--  发布时间:2019/5/29 18:36:00
--  

比如代码

 

http://www.foxtable.com/webhelp/scr/2755.htm

 


--  作者:ZJZK2018
--  发布时间:2019/5/29 19:39:00
--  
不是动态加载表的代码,我的需求是:
导航栏“招投标管理”页面中的任何一个按钮时,触发动态加载表代码?

For Each nm As WinForm.Control In e.Form.Controls("NavBar1").NavPages("招投标管理").Children
    If typeof nm Is Winform.Button
        Dim c As Winform.Button = nm
        msgbox(c.Name)
    End If
Next

Dim nms() As String = {"产品","订单","订单明细"}
For Each nm As String In nms
    If DataTables.Contains(nm) = False Then
        DataTables.Load(nm)
    End If
Next

[此贴子已经被作者于2019/5/29 19:41:10编辑过]

--  作者:有点甜
--  发布时间:2019/5/29 21:06:00
--  

 

你把代码写到click事件不就可以了?

 

请具体说明问题。