Foxtable(狐表)用户栏目专家坐堂 → [求助]如何将表中的列名填充到另一表的列中


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

主题:[求助]如何将表中的列名填充到另一表的列中

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


加好友 发短信
等级:婴狐 帖子:41 积分:479 威望:0 精华:0 注册:2012/4/12 9:51:00
[求助]如何将表中的列名填充到另一表的列中  发帖心情 Post By:2014/4/26 0:05:00 [只看该作者]

我想将“文综”表中第6列(即“全卷”列)开始至28列(即“政治”列)的列名填充到生成的表“Km & "小题分析"”中的“题号”列中,如何写代码?请指教。谢谢!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:复件 高中试卷难度区分度分析.rar


 


图片点击可在新窗口打开查看此主题相关图片如下:政治小题分析.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:103 积分:859 威望:0 精华:0 注册:2014/4/2 13:46:00
  发帖心情 Post By:2014/4/26 1:27:00 [只看该作者]

For i As Integer = 6 To 28
    Dim zzth As Row  = Tables("政治小题分析").AddNew
    zzth.DataRow("题号") = Tables("文综").Cols(i).Name
Next

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/4/26 8:22:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:复件 高中试卷难度区分度分析.rar


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


加好友 发短信
等级:婴狐 帖子:41 积分:479 威望:0 精华:0 注册:2012/4/12 9:51:00
  发帖心情 Post By:2014/4/26 8:51:00 [只看该作者]

搞定。谢谢!

 回到顶部