VB中 我想产生一个 1000-9999的随机数 该如使用INT(RND*(B-A)+1)+A

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 18:36:59

VB中 我想产生一个 1000-9999的随机数 该如使用INT(RND*(B-A)+1)+A
VB中 我想产生一个 1000-9999的随机数 该如使用INT(RND*(B-A)+1)+A

VB中 我想产生一个 1000-9999的随机数 该如使用INT(RND*(B-A)+1)+A
Private Sub Command1_Click()
Randomize
n = Int(Rnd * (9999 - 1000) + 1) + 1000
Text1.Text = n
End Sub