以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教随机数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=57811)

--  作者:hbhb
--  发布时间:2014/10/4 20:04:00
--  请教随机数
甜大师:好!
请问如何生成大于计算机时间的随机时间?

--  作者:有点甜
--  发布时间:2014/10/4 20:06:00
--  
思路,当前时间加上一个随机的秒数即可。
--  作者:有点甜
--  发布时间:2014/10/4 20:07:00
--  
Dim d As Date = Date.Now.AddSeconds(Rand.Next(10000))
msgbox(d)

--  作者:hbhb
--  发布时间:2014/10/4 20:21:00
--  
谢谢!