使用Page
Page表示一个页面，一个网页可以有多个Page，用于显示不同的内容。
Page需要自行编写代码切换，如果需要自带切换按钮，可以使用TabBar。
添加Page的语法为：
AddPage(ParentID,ID,Visible)
| ParentID | 父容器ID，如果是顶层对象，设为""即可。 |
| ID | 页面ID。 |
| Visible | 可选参数，逻辑型，用于设置页面默认是否显示。默认为True。 |
一个例子
假定要生成一个网页，这个网页包括两个Page，可以相互切换：
HttpRequest事件代码：
'''
Select
Case e.Path
Case "test.htm"
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以及易表的优势融合在一起,无论是数据录入、查询、统计,还是报表生成,都前所未有的强大和易用,普通用户无需编写任何代码,即可轻松完成复杂的数据管理工作,真正做到拿来即用.")
.AddImage("./images/001.jpg")
End With
With wb.AddButtonGroup("page1","btg1")
.Add("btn1",
"下一页",
"button").Attribute="onclick=""hide('page1');show('page2')"""
End With
With wb.AddArticle("page2","ar2")
.AddTitle("h1","关于易表")
.AddContent("易表.net介于电子表格和数据库软件之间，它有类似电子表格的界面，同时又有很多数据库软件特有的功能和灵活性，它能将复杂的操作简单化，让普通用户轻松完成复杂的数据管理和统计分析工作.")
.AddImage("./images/002.jpg")
End With
With wb.AddButtonGroup("page2","btg2")
.Add("btn2",
"上一页",
"button").Attribute="onclick=""hide('page2');show('page1')"""
End With
e.WriteString(wb.Build)
'生成网页
End
Select