随机6位数(无重复)MS Access 2010数据库?

时间:2013-12-16 15:36:35

标签: vba ms-access random

我有一个数据库,其表单可以为MS Access数据库中的特定信息集生成ID。此ID表示当前日期和随机的6位数字。目前,我的日期字段的默认值为=Date(),默认值为Right(Format(Rnd()*1000000,'000000'),6)的随机数字段为6位数字,然后我在ID字段中使用此=[DateRequested] & "-" & [RandomNumber]在中心用破折号获取字段的连接版本。两者都正常工作,但当我关闭并重新打开数据库时,我得到相同的数字进展。我在这里看到了一些关于在代码中发出Randomize语句的内容,但我对代码不是很擅长并且不知道如何实现它。

我试着通过线程将它放在一起这样做:

Private Sub Form_Load()
Randomize()
End Sub

但我收到此错误消息:

  

编译错误:预期:=

我只需要知道我需要更改什么才能让数据库在每次打开数据库时拉出一个新的6位数字,而不是每次都输入相同的数字。

1 个答案:

答案 0 :(得分:0)

从调用中删除括号