Foxtable(狐表)用户栏目专家坐堂 → [求助]判定是否存在指定列名的列的代码如何写?


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

主题:[求助]判定是否存在指定列名的列的代码如何写?

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


加好友 发短信
等级:五尾狐 帖子:1104 积分:8956 威望:0 精华:0 注册:2014/10/25 11:24:00
[求助]判定是否存在指定列名的列的代码如何写?  发帖心情 Post By:2014/12/29 15:04:00 [只看该作者]

A表的DataColChanged

'向工序合并表写入记录模块
If e.DataCol.Name = "审核" AndAlso e.DataRow("审核") = True Then
    Dim dr As DataRow = DataTables("工序合并表").AddNew
    For Each dc As DataCol In DataTables("工序合并表").DataCols
        If A表上存在名为dc.name的列 Then
            dr(dc.Name) = e.DataRow(dc.Name)
        End If
    Next
End If
[此贴子已经被作者于2014-12-29 15:04:08编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1959 积分:15508 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2014/12/29 15:09:00 [只看该作者]

If Tables("A表").Cols.Contains("dc.Name")=True Then

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


加好友 发短信
等级:八尾狐 帖子:1959 积分:15508 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2014/12/29 15:09:00 [只看该作者]

If Tables("A表").Cols.Contains(dc.Name)=True Then

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


加好友 发短信
等级:五尾狐 帖子:1104 积分:8956 威望:0 精华:0 注册:2014/10/25 11:24:00
  发帖心情 Post By:2014/12/29 15:15:00 [只看该作者]

谢谢 新福星

 回到顶部