[求助]数据自动输入问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]数据自动输入问题

共有21558人关注过本帖树形打印复制链接主题：[求助]数据自动输入问题

jgc1010

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：94 积分：952 威望：0 精华：0 注册：2009/3/5 16:10:00

[求助]数据自动输入问题 发帖心情

Post By：2009/3/15 13:03:00 [只看该作者]

请教一下：档号=[全宗号]+'-'+[分类号]+'-'+[目录号]+'-'+[案卷号]，或由其它数个字段的值构成，有多种构成方式，而档号相当于人的身份证号码，是惟一的，表与表之间多用档号来作关联．能否不用表达式字段，而让它自动生成吗？

[此贴子已经被作者于2009-3-15 13:03:26编辑过]

czy

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/3/15 13:27:00 [只看该作者]

当然可以。

DataColChanged事件，如：

Dim dr As DataRow = e.DataRow
If e.DataCol.Name = "全宗号" OrElse e.DataCol.Name = "分类号" OrElse e.DataCol.Name = "目录号" OrElse e.DataCol.Name = "案卷号" Then
e.DataRow("档号") = dr("全宗号") & "-" & dr("分类号") & "-" & dr("目录号") & "-" & dr("案卷号")
end if