Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

[5分]高手请看——录入记录时如何自动实现字段值的规律性改变?

白桦林  发表于:2011-09-23 19:27:15  
复制

 

 

如上图:

 

我在录入数据时在[档案号]和[所属年月][分值]这三个字段(其他字段为默认值)的输入值后把光标放在[分值]字段的位置

 

我想实现的是:

只按方向键向下的箭头在[分值]字段处输入分值

而此时的档案号=上一记录的档案号(=9999),所属年月字段的值等于上一记录所属年月的值的月份+1(即变为2011-9-26)

 

哪位高手有什么好办法能实现?

 

 

Top
煮江品茶 发表于:2011-09-23 20:45:38
设默认值为:DateAdd("m",1,Dlast("所属年月","tbname"))

dbaseIIIer 发表于:2011-09-24 05:33:15

最好的大量数据录入介面是

 

1. 定好 TAB顺序

2. 为每个字段的 AfterUpdate 内

 设 Me!字段.DefaultValue = "=" & 什么什么的

 

如 档案号

me!档案号.DefaultValue = Me!档案号

 

所属年月

me!所属年月.DefaultValue= "=#" & Format( DateAdd("m",1,me!所属年月),"yyyy-mm-dd") & "#"

输入时就可以不看画面 回车回车 输入不同值, 又回车回车 等

 

下键最好可以就不要做了, 输入员便要看画面操作了!

 

不然你要从 OnKeyDown 内

if keyascii= vbDown and shift=0 then docmd.gotorecord ,, acNext



白桦林 发表于:2011-09-26 23:10:28

一楼的方法存在点问题

每次都会产生两条默认值一样的记录

经过提醒找到了解决办法~!

谢谢

给个最佳~!



总记录:3篇  页次:1/1 9 1 :