为什么同一个函数在不同的窗体中用法不一呢？

殷小宝　发表于：2013-07-21 00:42:30 　

这是《支持断号重续功能的自动编号示例》中的代码：

在订单窗体中：

Private Sub Form_Current()
If Me.NewRecord Then
Me.订单号.DefaultValue = """" & AutoNum("订单表", "订单号", "OD" & Format(Date, "yyyymm"), 4, True) & """"
Else
Me.订单号.DefaultValue = ""
End If
End Sub
在属性窗体中：

Private Sub Form_Current()

If Me.NewRecord Then

Me.序号.DefaultValue = AutoNum("属性表", "序号", , , True) ‘问题是：为什么此处的默认值不加四个双引号，就可以正常呢，而上面那个如果不加4个引号就不正常呢。

Else

Me.序号.DefaultValue = ""

End If

End Sub

Top

cspa 发表于：2013-07-21 06:24:27

数据类型不同，＂Me.订单号＂是字符型的，＂Me.序号＂是数字型的。而函数本身的计算结果是数字型的，加4个＂实际相当于告诉access是字符串相联，access即自动将函数的计算结果转换为字符型。这样即可正确赋值给订单号，序号的数据类型与函数计算结果相同，不用转换。

Top

漏蛧尐魚℡ 发表于：2013-07-21 07:50:52

看下这个：http://www.accessoft.com/article-show.asp?id=8288

Top

殷小宝发表于：2013-07-21 09:06:26

还是cspa观察仔细，一个是数值型，一个是文本型，数值型是不用加引号的。谢谢两位回答的老师。

Top

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

Access交流中心

[5分]为什么同一个函数在不同的窗体中用法不一呢？