Ms access 如果没有完整的菜单或导航窗格，“Rnd”功能将无法工作

我使用Access2007创建了一个Access数据库，用户可以从中获得一个启动表单，从文件夹中加载一个随机图像

我用了一种非常简单的方法。我使用RND函数生成一个介于1和7之间的随机数，然后使用嵌套if从文件夹中加载相应的图像

我还尝试了一种稍微不同的方法，将数字存储在表1-7中，并使用RND函数从中选择一个随机记录，然后再次使用嵌套if

在完全开发模式下运行数据库时，这两种技术都可以正常工作，所有菜单、功能区和视图都已启用

问题是当我试图通过禁用“允许完整菜单”和“显示导航窗格”来为用户创建版本时。我每次都得到相同的图像。我添加了一个MsgBox来查看生成的数字的值，函数每次都神秘地返回一个特定的数字。每次运行数据库时都会生成相同的编号

我使用的第一种技术是：

myrand=Int7-1+1*Rnd+1

我使用的第二种技巧是：

得益于SuperRod在本论坛上的一篇帖子，从picslist order by rndpicid中选择排名前1的picid

Rnd函数帮助主题说，在调用Rnd之前，使用不带参数的随机化语句以基于系统计时器的种子初始化随机数生成器

随机化 myrand=Int7-1+1*Rnd+1

---

使用第一种技术效果很好，但第二种技术不起作用。但这对我来说已经足够了。谢谢