[求助]关于容器控件的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关于容器控件的问题

共有9965人关注过本帖树形打印复制链接主题：[求助]关于容器控件的问题

源理

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：49 积分：680 威望：0 精华：0 注册：2012/2/17 15:55:00

[求助]关于容器控件的问题 发帖心情

Post By：2013/1/7 19:56:00 [只看该作者]

想在NavBar其中一页面的TopicBar控件中增加一个page代码如何写？

Forms("导航条").Controls("NavBar1").NavPages("日常工作").Controls("日常工作").Pages.clear

上面的清除方法能运行

用下面的ADD就不能运行了，不知道为什么

Forms("导航条").Controls("NavBar1").NavPages("日常工作").Controls("日常工作").Pages.add("as","ss","zy_Find.ico")

弄不明白了，最开始调用的是forms("导航条").controls（"日常工作"）.pages.add("aa","ss","zy_find.ico")这个也错的。

我又用遍历所有控件下面的试了，居然能加了

Dim f As object
For Each f In Forms("导航条").controls
If Typeof f Is WinForm.TopicBar
f.pages.add("as","ss","zy_Find.ico")
End If
Next

现在想知道是容器内怎么调用里面的控件，有什么限制。

[此贴子已经被作者于2013-1-7 20:09:20编辑过]

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47511 积分：251479 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2013/1/7 20:12:00 [只看该作者]

测试通过：

Dim nav As WinForm.NavBar = e.Form.Controls("NavBar1")
nav.NavPages.add("abc","www","addrow32.ico")

源理

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：49 积分：680 威望：0 精华：0 注册：2012/2/17 15:55:00

Post By：2013/1/7 20:37:00 [只看该作者]

我是要在NavPages页中的Topicbar控件中加一个页面。不是给NavBar控件加控件。

原因找到了，原来是我把NaVpages中的页面名称和topicbar的控件名设置一样的，这样程序居然就报错了

[此贴子已经被作者于2013-1-7 20:46:28编辑过]

主题：[求助]关于容器控件的问题