复选列表项
要使用复选列表项，首先得定义一个复选列表组，定义复选列表组的语法是：
AddCheckGroup(ParentID, ID)
AddCheckGroup(ParentID, ID, Text)
| ParentID | 父容器的ID,如果是顶层对象，设置为""即可。 |
| ID | 分组ID。 |
| Text | 可选参数，用于指定分组标题。 |
增加复选列表项的语法是：
Add(ID, Text)
Add(ID, Text, Checked)
| ID | 列表项ID。 |
| Text | 复选列表项的文本内容。 |
| Checked | 逻辑型，可选参数，复选列表项默认是否勾选。 |
复选列表项的属性有：
| Value | 字符型，勾选后传递给服务端的值，如果不设置，将传递"on"值给服务端。 |
| Enabld | 逻辑型，设置为False，将无法勾选此列表项。 |
示例
HttpRequest事件代码：
Select
Case e.Path
Case
"test.htm"
Dim
wb As New
weui
wb.AddForm("","form1","test.htm")
With wb.AddCheckGroup("form1","rdg1","浏览器")
.Add("bw1","Intenet
Explorer", True)
'默认勾选
.Add("bw2","Google
Chorme")
.Add("bm3","FireFox")
.Add("bm4","Safari").Enabled
= False '此项不可选
End With
With
wb.AddButtonGroup("form1","btg1",True)
.Add("btn1",
"确定",
"submit")
End With
e.WriteString(wb.Build)
'生成网页
End
Select
下图是在手机上的显示效果：