Foxtable(狐表)用户栏目专家坐堂 → 代码新增表达式列


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

主题:代码新增表达式列

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


加好友 发短信
等级:幼狐 帖子:127 积分:1463 威望:0 精华:0 注册:2014/10/15 11:39:00
代码新增表达式列  发帖心情 Post By:2014/12/3 21:09:00 [只看该作者]

请问如何用代码新增表达式列?

测试代码 在AfterOpenProject中设置代码:

DataTables("User").DataCols.Add("memo“,GetType(Double),"")

With DataTables("User")
.DataCols("memo").Caption="备注"
End With


这个时候系统提示:memo不存在?

以上,谢谢。

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


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

If DataTables("表A").DataCols.Contains("memo") = False Then
    DataTables("表A").DataCols.Add("memo",Gettype(Double),"")
End If
DataTables("表A").DataCols("memo").Caption = "备注"
DataTables("表A").BuildHeader

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


加好友 发短信
等级:幼狐 帖子:127 积分:1463 威望:0 精华:0 注册:2014/10/15 11:39:00
  发帖心情 Post By:2014/12/3 21:24:00 [只看该作者]

这个代码是放置在AfterOpenProject里面吗?

上面我发的代码,写掉了BuildHeader()

代码应该和你这个一样,只是缺少列的判断。

一样会提示User 表  不存在  memo列

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


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

 不可能是上面的代码有错,肯定不是。

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


加好友 发短信
等级:幼狐 帖子:127 积分:1463 威望:0 精华:0 注册:2014/10/15 11:39:00
  发帖心情 Post By:2014/12/3 21:27:00 [只看该作者]

恩。正确。
发现是有个列名称 字母错了。感谢。

 回到顶部