以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  导航分类  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=115027)
--  作者：yifan3429
--  发布时间：2018/2/28 1:37:00
--  导航分类
Dim o As new C1.Win.C1Command.C1OutBar
o.name="o"
o.dock=5 \'锚定
o.VisualStyle=5 \'主题
o.pagetitleheight=25 \'页面高度
For i As Integer=1 To 4
    Dim p1 As new C1.Win.C1Command.C1OutPage \'新建页面
    p1.name="p" & i
    p1.text="新建" & i    这里需要建立不同的页面：  财务  系统  订单 制造 4个页面
    o.Pages.add(p1)
Next

e.Form.Controls("Panel1").basecontrol.controls.add(o)
--  作者：有点甜
--  发布时间：2018/2/28 9:02:00
--  

Dim o As new C1.Win.C1Command.C1OutBar
o.name="o"
o.dock=5 \'锚定
o.VisualStyle=5 \'主题
o.pagetitleheight=25 \'页面高度
Dim ary() As String = {"财务","系统","订单","制造"}
For i As Integer=1 To 4
    Dim p1 As new C1.Win.C1Command.C1OutPage \'新建页面
    p1.name="p" & i
    p1.text=ary(i-1)
    o.Pages.add(p1)
Next

e.Form.Controls("Panel1").basecontrol.controls.add(o)
--  作者：yifan3429
--  发布时间：2018/2/28 15:22:00
--  
Dim ary() As String = {"财务","系统","订单","制造"}

文字居中怎么写呢
--  作者：有点甜
--  发布时间：2018/2/28 15:42:00
--  
以下是引用yifan3429在2018/2/28 15:22:00的发言：
Dim ary() As String = {"财务","系统","订单","制造"}

文字居中怎么写呢

 

不可以，只能填充空格。