按键精灵吧 关注:499,655贴子:1,012,871
  • 6回复贴,共1

求高手写个0.5至0.8的随机数

只看楼主收藏回复

高手帮忙写下吧,自己写的每次生成的都是.5而不是0.5,自己怎么弄都不显示小数点前面的0求高手指点。


IP属地:四川来自手机贴吧1楼2018-03-28 20:03回复
    数组或文本


    IP属地:广东2楼2018-03-28 20:44
    收起回复
      Function 随机数(数)
      随机数 = Int((数 + 1) * Rnd())
      End Function
      Dim 数组=Array (".5",".6",".7",".8")
      TracePrint 数组(随机数(3))


      IP属地:广东3楼2018-03-28 21:09
      收起回复