Foxtable(狐表)用户栏目专家坐堂 → [求助]手机开发中的列表输入框如何赋值?


  共有2020人关注过本帖树形打印复制链接

主题:[求助]手机开发中的列表输入框如何赋值?

帅哥哟,离线,有人找我吗?
新福星
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1964 积分:15604 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]手机开发中的列表输入框如何赋值?  发帖心情 Post By: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赋值?

 回到顶部