使用Panel
Panel主要用于图文组合列表显示。
一个例子
Select
Case e.Path
Case
"test.htm"
Dim wb As New WeUI
Dim txt As
String = "由各种物质组成的巨型球状天体,叫做星球.星球有一定的形状,有自己的运行轨道."
With wb.AddPanelGroup("","pg1","图文组合列表")
.Add("pn1","标题一",txt,"./images/button.png","http://www.foxtable.com") '超链接
With .Add("pn2","标题二",txt,"./images/search.png") '带子链接
.AddFoot("文字来源")
.AddFoot("时间")
.AddFoot("|其他信息","http://www.foxtable.com")
End
With
End
With
With wb.AddPanelGroup("","pg2","文字组合列表")
.Add("pn1","标题一",txt) '普通列表
.Add("pn1","标题二",txt,"","http://www.foxtable.com") '超链接
With .Add("pn2","标题三",txt) '带有子链接
.AddFoot("文字来源")
.AddFoot("时间")
.AddFoot("|其他信息","http://www.foxtable.com")
End
With
.GroupFoot = "查看更多"
'底部链接
.GroupHref = "http://www.foxtable.com/"
End
With
e.WriteString(wb.Build) '生成网页
End
Select
按照这个示例,我如果想提取数据库中的某一列数据,并分页显示,该怎么设置呢?