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