Access随机批量生成时间
- 2018-01-26 16:36:00
- 黄善超 原创
- 1229
在数据库中,我们往往需要不同的数据来测试程序是否存在bug。
如录入多个随机时间,那么如何随机生成多个时间呢?
如下代码:用Rnd函数生成随机值
Public Function 随机时间(iTime As Integer) Dim i As Integer For i = 1 To iTime Debug.Print Right(Date + Rnd, 8) Next End Function
测试效果如图:
文章分类
联系我们
联系人: | 王先生 |
---|---|
电话: | 13928102596 |
Email: | 18449932@qq.com |
QQ: | 18449932 |
微信: | 13928102596 |
微博: | officecn01 |