请帮忙改一下这句代码

马山杨梅　发表于：2008-10-27 11:59:10 　

从推荐文章《[荐]超管用的VBA一句话代码》中抄得一句代码

成绩.DefaultValue = "'" & DLast("成绩", Me.RecordSource) & "'"

可以从最后一条记录取得某数值，作为新记录的默认值，确实挺管用。

但只能用于写入目标字段为【文本类型】，现在想把它用在来源和目标都是【双精度类型】的实际应用中，我水平不够，请行家替我改改，谢谢！

trynew 发表于：2008-10-27 12:33:28

我试了一下，语句与字段数据类型没有关系，结果都正确。关键是在于语句要放在窗体的成为当前事件中，以保证每次输入后都可及时更新默认值。

Private Sub Form_Current()
面积.DefaultValue = "'" & DLast("面积", Me.RecordSource) & "'"
End Sub

马山杨梅发表于：2008-10-27 14:57:12

谢谢您！原来是我先前试的表字段名称中有括号，看来今后给字段起名字时真的不能夹杂符号。

太谢谢您了！

总记录：2篇页次：1/1 9 1 :

Access交流中心