主题：[求助] c1outbar

老师，论坛里的例子，我是门外汉，如何逐个定义p1.text="新建" & i 的名称  新建1 = 数据录入 新建2 = 数据查询

Dim o As new C1.Win.C1Command.C1OutBar
o.name="o"
o.dock=5 '锚定
o.VisualStyle=9 '主题
o.pagetitleheight=25 '页面高度
For i As Integer=1 To 5
    Dim p1 As new C1.Win.C1Command.C1OutPage '新建页面
    p1.name="p" & i
    p1.text="新建" & i
    o.Pages.add(p1)
Next
e.Form.Controls("Panel1").basecontrol.controls.add(o)

'加入到导航控件
e.Form.Controls("panel2").left=0
e.Form.Controls("panel2").top=0
e.Form.Controls("panel2").dock=5 '锚定
o.Pages("p1").controls.add(e.Form.Controls("panel2").basecontrol)
e.Form.Controls("panel3").left=0
e.Form.Controls("panel3").top=0
e.Form.Controls("panel3").dock=5 '锚定
o.Pages("p2").controls.add(e.Form.Controls("panel3").basecontrol)

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:c1outbar导航控件.zip

谢谢！