NavPages
返回导航栏的页面集合,通过此集合,可以访问指定名称或位置的页面。
导航栏页面的类型为NavPage,接下来我们会介绍。
示例
Dim Bar As WinForm.NavBar
Dim Page1 As WinForm.NavPage
Dim Page2 As WinForm.NavPage
Bar =
Forms("窗口1").Controls("NavBar1")
Page1 = Bar.NavPages("Task")
Page2 = Bar.NavPages(0)
NavPages有以下属性和方法:
Add
增加新的导航页面,并返回所增加的页面。
语法:
Add(Name, ButtonText, ButtonImageFile)
Name:
页面名称
ButtonText: 页面按钮的标题
ButtonImageFile:页面按钮的图标文件,如果事先复制到项目文件的Images子目录下,则无需路径,否则必须包括路径。
Insert
插入新的导航页面,并返回所插入的页面。
语法:
Insert (Name, ButtonText, ButtonImageFile,
Index)
Name: 页面名称
ButtonText:
页面按钮的标题
ButtonImageFile:页面按钮的图标文件,如果事先复制到项目文件的Images子目录下,则无需路径,否则必须包括路径。
Index: 插入位置