使用List

List(列表)用于列表内容，列表项可以附带说明、超链接和图标。

一个例子

HttpRequest事件代码

Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddListGroup("", "lsg1","简单列表")
            .Add("ls1", "新浪主页")
            .Add("ls2", "网易主页")
        End With
        With wb.AddListGroup("", "lsg2", "增加说明的列表")
            .Add("ls3","新浪主页", "sina.com")
            .Add("ls4","网易主页", "163.com")
        End With
        With wb.AddListGroup("", "lsg3", "增加跳转的列表")
            .Add("ls5","新浪主页", "sina.com", "http://www.sina.com.cn")
            .Add("ls6","网易主页", "163.com", "http://www.163.com")
        End With
        With wb.AddListGroup("", "lsg4","增加图标的列表")
            .Add("ls7","新浪主页", "sina.com", "http://www.sina.com.cn", "./images/sina.png")
            .Add("ls8","网易主页", "163.com", "http://www.163.com", "./images/163.png")
        End With
        e.WriteString(wb.Build)
End Select

图标大小建议为16*16像素，下图是通过手机访问的效果：

AddListGroup

Add用于增加列表项组，其语法为：

AddListGroup(ParentID, ID, Text)

Add

Add用于增加列表项，其语法为：

Add(ID, Text)
Add(ID, Text, Description)
Add(ID, Text, Description, Href)
Add(ID, Text, Description, Href, Image)