VB 生成四位正整数随机数,公式没错却会产生三位数是为什么呢VB 生成四位正整数随机数,用Text1.Text = Str(Int(Rnd * 9999 - 1000 + 1) + 1000),却会产生三位的正整数是为什么?

来源:学生作业学帮网 编辑:学帮网 时间:2024/06/06 11:31:13

VB 生成四位正整数随机数,公式没错却会产生三位数是为什么呢
VB 生成四位正整数随机数,用Text1.Text = Str(Int(Rnd * 9999 - 1000 + 1) + 1000),却会产生三位的正整数是为什么?

公式是有问题的,正确的写法应该是CInt(Rnd * 9000) + 1000