Foxtable(狐表)用户栏目专家坐堂 → 怎么增加一列数据列


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

主题:怎么增加一列数据列

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/19 9:07:00 [显示全部帖子]


datacolchanged事件

If e.DataCol.Name = "证件号码" Then 
    If e.DataRow.IsNull("
证件号码") orelse len(e.DataRow("证件号码")) < 18 Then
        e.DataRow("身份证号") = Nothing
    
Else
        e.
DataRow("
身份证号") = left(e.DataRow("证件号码"),18) 'http://www.foxtable.com/webhelp/topics/3264.htm
    End
 If
End
 
If

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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/19 9:51:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/19 10:31:00 [显示全部帖子]

For Each dr As DataRow In DataTables("表A").DataRows
if dr.isnull("证件号码") =false andalso dr("证件号码").length > 18
    dr("身份证号") = left(dr("证件号码"),18)
end if
Next
DataTables("表A").Save
[此贴子已经被作者于2024/2/19 10:31:02编辑过]

 回到顶部