2

我在 Access 中工作,我需要为分成记录的用户列表创建一个随机的 4 位数字。我的查询不断为每条记录返回相同的随机数。

SELECT 1000 + (1999-1000)*RND() as [PassCodes], 
    stafflistEMAIL.Name, stafflistEMAIL.Description 
FROM stafflistEMAIL;

我怎样才能使这项工作,我查看过的其他回答没有提供解决方案?

4

2 回答 2

2

正如一个想法,以下将给出4个随机字符:

Mid(CreateObject("Scripting.FileSystemObject").GetTempName,4,4)

例如:

906F
0818
25A5
F200
918F
A166
于 2012-08-16T19:29:06.077 回答
1

在 VBA 中重复随机变量

在调用 之前Rnd,使用Randomize不带参数的语句来使用基于系统计时器的种子来初始化随机数生成器。

在很大程度上取决于您的目标,您可以做一些有趣的事情,如下所示:

Right(Cstr(CInt(Len(stafflistEMAIL.Name)*Len(stafflistEMAIL.Description)/1000)),4)
于 2012-08-16T17:03:36.913 回答