作业帮 > 数学 > 作业

vb中 rnd函数,随机产生一个数,可能是小数,可能是整,且无范围,该怎么写,急,

来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:数学作业 时间:2024/04/29 12:19:33
vb中 rnd函数,随机产生一个数,可能是小数,可能是整,且无范围,该怎么写,急,
vb中 rnd函数,随机产生一个数,可能是小数,可能是整,且无范围,该怎么写,急,
Private Sub Form_Load()
Text1.Text = ""
End Sub
Private Sub Timer1_Timer()
Randomize
Static i
i = i + 1
Text1.Text = Text1.Text & Format((5 * Rnd(i)) ^ 9, "0.00") & vbCrLf
End Sub
再问: 在文本框中输出咋办
再答: 已经改过来了 如果是单行的 Text1.Text = Format((5 * Rnd(i)) ^ 9, "0.00")
再问: 能不能简单点,看不懂啊,越简单越好,一个command, 一个text
再答: Private Sub Command1_Click() Randomize Text1.Text = Format((5 * Rnd) ^ 9, "0.00") End Sub
再问: 真的做对了,但是为什么要这么做,能详细讲一下吗
再答: Rnd是随机数,前面必须有Randomize,Format是格式化,把结果变成两位小数。 这个也并非无范围,而是最大为5的9次方
再问: 这个能不能产生整数
再答: 你不是要带小数的么?你可以这样。 Private Sub Command1_Click() Randomize Text1.Text = Replace(Format((5 * Rnd) ^ 9, "0.00"),"0.00","") End Sub 采纳吧,不再回复。