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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]导航

共有2314人关注过本帖树形打印复制链接主题：[求助]导航

大红袍

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

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/8/24 19:21:00 [显示全部帖子]

设置字体，要总体设置。

o.font = new font("宋体", 12)

大红袍

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

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/8/24 19:40:00 [显示全部帖子]

Dim o = e.Form.Controls("Panel1").basecontrol.controls("o")
o.Pages("p1").Text = "123456"

大红袍

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

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/8/24 21:12:00 [显示全部帖子]

Dim o As new C1.Win.C1Command.C1OutBar
o.name="o"
o.dock=5 '锚定
o.VisualStyle=9 '主题
o.pagetitleheight=22 '页面高度

Dim p1 As new C1.Win.C1Command.C1OutPage '新建页面
p1.name="aaa"
p1.text="bbb"
o.Pages.add(p1)

p1 = new C1.Win.C1Command.C1OutPage '新建页面
p1.name="ccc"
p1.text="ddd"
o.Pages.add(p1)

e.Form.Controls("Panel1").basecontrol.controls.add(o)

主题：[求助]导航