代码来源于帮助文件的例子:
Dim wb As New weui
wb.AddPage("","page1") '增加两个page
wb.AddPage("","page2",False) '第二个
With wb.AddArticle("page1","ar1")
.AddTitle("h1","关于Foxtable")
.AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
.AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
.AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
.AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
.AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
.AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
.AddContent("Foxtable将Excel?Access?Foxpro?VB以及易表的优势融合在一起,无论是数据录入?查询?统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
End With
With wb.AddButtonGroup("page1","btg1")
.Add("btn1", "下一页", "button").Attribute="""
End With
With wb.AddArticle("page2","ar2")
.AddTitle("h1","关于易表")
.AddContent("易表.net介于电子表格和数据库软件之间,它有类似电子表格的界面,同时又有很多数据库软件特有的功能和灵活性,它能将复杂的操作简单化,让普通用户轻松完成复杂的数据管理和统计分析工作.")
End With
With wb.AddButtonGroup("page2","btg2")
.Add("btn2", "上一页", "button").Attribute="""
End With