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


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

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

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


加好友 发短信
等级:婴狐 帖子:33 积分:366 威望:0 精华:0 注册:2015/5/5 11:00:00
[求助]遍历控件值,并存入集合,怎么调试不通过呢?请各位帮忙看一下  发帖心情 Post By:2015/6/10 9:07: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
        Exit For      
    End If 
    prds.Insert(i-1,e.Form.Controls("ComboBox"&i).Value )
Next 

[此贴子已经被作者于2015/6/10 9:07:31编辑过]

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


加好友 发短信
等级:婴狐 帖子:33 积分:366 威望:0 精华:0 注册:2015/5/5 11:00:00
  发帖心情 Post By:2015/6/10 9:17:00 [显示全部帖子]

ComboBox有值的就把这些值放在Prds集合里,没有就退出循环,不放
目的是把用户的选择内容放在集合里,后面要用

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


加好友 发短信
等级:婴狐 帖子:33 积分:366 威望:0 精华:0 注册:2015/5/5 11:00:00
  发帖心情 Post By:2015/6/10 9:23:00 [显示全部帖子]

非常感谢,调试通过了!可是为什么呢?放在End IF外就不执行了呢?

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


加好友 发短信
等级:婴狐 帖子:33 积分:366 威望:0 精华:0 注册:2015/5/5 11:00:00
  发帖心情 Post By:2015/6/10 9:29:00 [显示全部帖子]

图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看我错了!再次谢谢版主!

 回到顶部