Foxtable(狐表)用户栏目专家坐堂 → [求助]循环WEUI


  共有2109人关注过本帖平板打印复制链接

主题:[求助]循环WEUI

美女呀,离线,留言给我吧!
OKK
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:407 积分:4268 威望:0 精华:0 注册:2016/11/22 19:30:00
[求助]循环WEUI  发帖心情 Post By:2020/5/1 13:27:00 [只看该作者]

dim i as integer = e.cookies(usrname)
Dim wb As New WeUI
if i >= 1 then
        With wb.AddInputGroup("form1","ipg1")
            .AddInput("xm1","户名","text")
        End With
end if
if i >= 2 then
        With wb.AddInputGroup("form1","ipg2")
            .AddInput("xm2","户名","text")
        End With
end if
if i >= 3 then
        With wb.AddInputGroup("form1","ipg3")
            .AddInput("xm3","户名","text")
        End With
end if
if i >= 4 then
        With wb.AddInputGroup("form1","ipg4")
            .AddInput("xm4","户名","text")
        End With
end if
if i >= 5 then
        With wb.AddInputGroup("form1","ipg5")
            .AddInput("xm5","户名","text")
        End With
end if
e.WriteString(wb.Build)





以上代码,当i的值很大,比如是100000的时候,那么,下面的代码就要写很多
请问能不能使用循环的方式写出以上代码,怎么写?

 回到顶部