以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教下，如何在输入数据时自动添加数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194462)
--  作者：SUV2258
--  发布时间：2024/12/12 16:38:00
--  请教下，如何在输入数据时自动添加数据
老师好，请问下，我想实现在 校验信息表 的 校验编号列 中输入数据时，能够自动在数据的前面加上:ZRJC-WT- 这个内容，应够用什么办法？
例如，当我输入2024-0112后，在表格中能够自动实现：ZRJC-WT-2024-0112
--  作者：有点蓝
--  发布时间：2024/12/12 16:52:00
--  
在DataColChanging事件中设置如下代码：http://www.foxtable.com/webhelp/topics/0624.htm

If e.DataCol.Name = "校验编号" Then
    If e.NewValue > "" andalso e.NewValue.StartsWith("ZRJC-WT-")=false Then
      e.NewValue = "ZRJC-WT-" & e.NewValue
    End If
End If