以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]单号列自动输入  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=22861)

--  作者:13636600695
--  发布时间:2012/8/25 18:32:00
--  [求助]单号列自动输入

有如下表,怎样让我每添加一行,编号列自动输入


图片点击可在新窗口打开查看此主题相关图片如下:danhao.jpg
图片点击可在新窗口打开查看


--  作者:woiz
--  发布时间:2012/8/26 0:48:00
--  
你先设定单号的编码规则,再说代码
--  作者:13636600695
--  发布时间:2012/8/26 11:17:00
--  

规则就是在单据号文本框输入一串字符,单号列的内容都是按照单据号的内容输入


--  作者:狐狸爸爸
--  发布时间:2012/8/27 9:59:00
--  

设置DataRowAdding事件:

 

If Forms("窗口名").Opened Then

   e.Datarow("单号") = Forms("窗口名").Controls("输入框名称").Value

End If