Foxtable(狐表)用户栏目专家坐堂 → 奇怪的Caption!!!


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

主题:奇怪的Caption!!!

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


加好友 发短信 F6
等级:狐精 帖子:3030 积分:19188 威望:0 精华:2 注册:2008/9/1 7:50:00
奇怪的Caption!!!  发帖心情 Post By:2018/5/24 9:16:00 [只看该作者]

代码1:
For each cl as Col in Tables("表1").Cols
     Dim cn as string =  cl.Caption
Next

代码2:
For i as Integer = 0 To 5 
     Dim cn as string =  Tables("表1").Cols(i).Caption
Next

结果是,代码1出现错误提示:编译错误,Caption不是Col的成员
代码2正常
[此贴子已经被作者于2018/5/24 11:09:10编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/24 9:17:00 [只看该作者]

是 caption,不要写错

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


加好友 发短信
等级:七尾狐 帖子:1505 积分:9045 威望:0 精华:0 注册:2017/10/24 15:24:00
  发帖心情 Post By:2018/5/24 9:22:00 [只看该作者]

这里 cn 不弄个数组的话,感觉不能每一个都赋值呀,它的值应该只是下标为5这个值

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


加好友 发短信 F6
等级:狐精 帖子:3030 积分:19188 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2018/5/24 11:11:00 [只看该作者]

以下是引用有点甜在2018/5/24 9:17:00的发言:
是 caption,不要写错
刚才做例子产生了笔误。事实请测试,有点小问题


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


加好友 发短信 F6
等级:狐精 帖子:3030 积分:19188 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2018/5/24 11:11:00 [只看该作者]

以下是引用lzw001在2018/5/24 9:22:00的发言:
这里 cn 不弄个数组的话,感觉不能每一个都赋值呀,它的值应该只是下标为5这个值

这样赋值并没有什么问题


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/24 11:21:00 [只看该作者]

以下是引用kylin在2018/5/24 11:11:00的发言:
刚才做例子产生了笔误。事实请测试,有点小问题

 

测试没问题

 

For Each cl As Col In Tables("表a").Cols
    Dim cn As String =  cl.Caption
Next

 

 


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


加好友 发短信 F6
等级:狐精 帖子:3030 积分:19188 威望:0 精华:2 注册:2008/9/1 7:50:00
  发帖心情 Post By:2018/5/24 18:07:00 [只看该作者]

收到,我的代码就是出现了这样的问题。不过这是小问题,无伤大雅,改用也是没有问题。

 回到顶部