| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 【已解决】[求助]NavBar这个空间的代码怎么用？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=134911) |
| -- 作者：zto001 -- 发布时间：2019/5/12 18:19:00 -- 【已解决】[求助]NavBar这个空间的代码怎么用？ [求助]NavBar这个空间的代码怎么用？ 帮助文档里面说的太简单了，没看懂。 比如我有个NavBar1，需要通过代码创建页面“页面A”“页面V”这两个页面，怎么写代码？
[此贴子已经被作者于2019/5/13 8:28:22编辑过]
|
| -- 作者：有点甜 -- 发布时间：2019/5/12 21:18:00 -- 参考这里
http://www.foxtable.com/webhelp/scr/0873.htm
|
| -- 作者：zto001 -- 发布时间：2019/5/13 8:28:00 -- Dim Bar As WinForm.NavBar Dim Page1 As WinForm.NavPage Bar = Forms("全局").Controls("NavBar1") Page1 = Bar.NavPages.Add("页面名称","按钮标题","路径.ico") \'增加页面 Page1 = Bar.NavPages.Insert("Task","标70题","002.ico",7) \'增加到指定位置 Bar.NavPages.Delete("页面名称") \'删除指定名称页面 Bar.NavPages.Delete(0) \'删除指定位置页面 Bar.NavPages.Clear \'清楚所有页面 MessageBox.Show( Bar.NavPages.Count ) \'返回页面数量
|