主题：[求助]移动端weui框架

参考代码

Select Case e.Path
    Case "test.htm",""
        Dim wb As New WeUI
        wb.AddTopTips("","toptip1","")
        wb.AddForm("","form1","logon.htm")
        With wb.AddInputGroup("form1","ipg1","用户登录")
            .AddInput("xm","户名","text")
            .AddInput("pw","密码","password")
        End With
        With wb.AddButtonGroup("form1","btg1",True)
            .Add("btn1", "确定", "submit")
        End With
        wb.InsertHTML("<style>#ipg1 .weui_label{color:red}</style>")
        e.WriteString(wb.Build)
       
End Select