作业帮vb中怎么生成给定范围内的不同随机数,包括边界数（生成的数中有小数和整数,不重复）
来源：学生作业帮 编辑：拍题作业网作业帮 分类：数学作业 时间：2024/06/04 15:17:31
vb中怎么生成给定范围内的不同随机数,包括边界数（生成的数中有小数和整数,不重复）
例如要生成0到9之间的三个随机数,包括9以及,范围内的小数
例如要生成0到9之间的三个随机数,包括9以及,范围内的小数
楼上回答的很不错,想要整数就Int(Rnd * 10)
再问： 我想要的是能够包括这些数，比如有0，……8.99，……9
再答： '试试变通的方法: Private Sub Command1_Click() Dim b(0 To 1) As Variant '假设2种数据,一种是小数,一种是整数 Dim u As Integer '用来放随机产生的下标 Randomize '随机种子初始化 b(0) = Format(Rnd * 9, "0.00") '你没有举出9.xx,所以这里就Rnd * 9了 b(1) = Int(Rnd * 10) u = Int((UBound(b) + 1) * Rnd()) '随机产生0-1两种类型之间的数字 a = b(u) '这就是你要的数 Print a End Sub
再问： 我想要的是能够包括这些数，比如有0，……8.99，……9
再答： '试试变通的方法: Private Sub Command1_Click() Dim b(0 To 1) As Variant '假设2种数据,一种是小数,一种是整数 Dim u As Integer '用来放随机产生的下标 Randomize '随机种子初始化 b(0) = Format(Rnd * 9, "0.00") '你没有举出9.xx,所以这里就Rnd * 9了 b(1) = Int(Rnd * 10) u = Int((UBound(b) + 1) * Rnd()) '随机产生0-1两种类型之间的数字 a = b(u) '这就是你要的数 Print a End Sub