Foxtable(狐表)用户栏目专家坐堂 → [求助]遍历控件值,并存入集合,怎么调试不通过呢?请各位帮忙看一下


  共有2560人关注过本帖树形打印复制链接

主题:[求助]遍历控件值,并存入集合,怎么调试不通过呢?请各位帮忙看一下

帅哥哟,离线,有人找我吗?
Bin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/6/10 9:10:00 [显示全部帖子]

你想做什么?

 
Dim prds As List(of String) 
Dim i As Integer 
For i=1 To 8 
    If e.Form.Controls("ComboBox"&i).Value Is Nothing Then
        Continue For     
    End If 
    prds.Insert(i-1,e.Form.Controls("ComboBox"&i).Value )
Next 

这个意思吗?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/6/10 9:19:00 [显示全部帖子]

看2楼

或者

Dim prds As new List(of String) 
Dim i As Integer 
For i=1 To 8 
    If e.Form.Controls("ComboBox"&i).Value Isnot Nothing Then
          prds.add(e.Form.Controls("ComboBox"&i).Value )
    End If 
    
Next

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/6/10 9:27:00 [显示全部帖子]

你直接是空就退出循环了.当然不行

 回到顶部