主题：浏览器提示：已添加了具有相同键的项。

 With wb.AddInputGroup("form1","ipg1")

修改后，依然提示：已添加了具有相同键的项。

Select Case e.Path
    Case "test.htm"
        Dim wb As New weui
        For i As Integer = 1 To 5
            With wb.AddArticle("","ar" & i)
                .AddImage("./images/00" & i & ".jpg")
            End With
            wb.AddForm("","form" & i,"test.htm")
            With wb.AddInputGroup("form" & i,"ipg" & i)
                .AddInput("xm" & i,"年龄","text")
                .AddInput("pw" & i,"城市","text")
            End With
            With wb.AddButtonGroup("form" & i,"btg" & i,False)
                .Add("btn1" & i, "确定", "submit")
                .Add("btn12" & i, "确定", "submit")
            End With
        Next
        e.WriteString(wb.Build) '生成网页
End Select

再问，如果前面已经加载了一部分内容，如果需要追载，可以吗？

参考

 

http://www.foxtable.com/mobilehelp/scr/0097.htm