以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]哪位大神帮忙看看代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90132) |
-- 作者:陈嘉淳 -- 发布时间:2016/9/6 10:22:00 -- [求助]哪位大神帮忙看看代码 static i As Integer static j As Integer If e.Col.Name="日期" And e.Row("日期") IsNot Nothing Then Dim d As Date d=e.Row("日期") If d.Month<>i Then i=d.Month j=1 e.Row("凭证号数")=d.Month & "-" & j Else j=j+1 e.Row("凭证号数")=d.Month & "-" & j End If End If 每次重新打开文件又会重新开始,烦啊
|
-- 作者:有点蓝 -- 发布时间:2016/9/6 10:29:00 -- 没看明白想要做什么,请详细描述问题 |
-- 作者:狐狸爸爸 -- 发布时间:2016/9/6 10:40:00 -- 你想自动编号? 可以参考: http://www.foxtable.com/webhelp/scr/2403.htm
|
-- 作者:陈嘉淳 -- 发布时间:2016/9/6 10:57:00 -- 就是做凭证编号,规则是x-y,x取日期中的月份,Y做流水号,X值发生变化时,Y重新从1开始计数 |
-- 作者:有点蓝 -- 发布时间:2016/9/6 11:05:00 -- 按3楼的方法做,不能用静态变量。 |
-- 作者:陈嘉淳 -- 发布时间:2016/9/6 11:11:00 -- 就是想不通为什么每次重新打开表的时候静态变量会归零,是不是全局静态变量可以解决。我是个菜鸟,刚看帮助文档10多天 |
-- 作者:陈嘉淳 -- 发布时间:2016/9/6 11:11:00 -- 谢谢 |