怎么随机不了呢

duke20198 · 发表于 2019-9-7 19:55:27

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

x = int((10-2+1)*Rnd()+2)
TracePrint x

s = Int((3000 - 1000 + 1) * Rnd() + 1000)
TracePrint s
Call Plugin.File.WriteFileEx("c:\s.txt", x & vbCrLf & s)

一直显示是82067
8
2067

紫猫 · 发表于 2019-9-7 20:59:39

开头加一句Randomize

duke20198 · 发表于 2019-9-11 11:56:26

谢谢老师。已成功了。

		自动登录	找回密码
密码			立即注册

[已回复] 怎么随机不了呢

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。