以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]手机开发中的列表输入框如何赋值?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=100175)

--  作者:新福星
--  发布时间:2017/5/6 7:34:00
--  [求助]手机开发中的列表输入框如何赋值?
Select Case e.Path
    Case "test.htm"
        Dim wb As New weui
        wb.AddForm("","form1","test.htm")
        With wb.AddInputGroup("form1","ipg1","列表项目")
            .AddSelect("os","操作系统","iOS|Windows|Andriod")
            .AddSelect("bw","浏览器","Chorme|[Edge]|Firefox|Internet Explorer")
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1""确定""submit")
        End With
        e.WriteString(wb.Build) 
\'生成网页
End
 Select

如何给os和bw赋值?

--  作者:有点蓝
--  发布时间:2017/5/6 8:47:00
--  
参考:http://www.foxtable.com/mobilehelp/scr/0048.htm

请仔细看帮助
[此贴子已经被作者于2017/5/6 8:47:03编辑过]