加好友 发短信
等级:八尾狐
帖子: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赋值?
|
|