主题：关于weui 数值录入框的问题

Select Case e.Path

    Case "test.htm"

        Dim wb As New weui

        wb.AddForm("","form1","test.htm")

        With wb.AddInputGroup("form1","ipg1","数值输入")

            .AddInput("xm","姓名","text")

            With .AddInput("sl","年龄","number")

                .Min = "18"

                .Max = "60"

                .Placeholder = "年龄范围为18到60"

            End With

            .AddInput("dj","工资","number").Step = "0.01"

        End With

        With wb.AddButtonGroup("form1","btg1",True)

            .Add("btn1", "确定", "submit")

        End With

        wb.AppendHTML("<script src='./test.js'></script>",True)

        e.WriteString(wb.Build) '生成网页

End Select