Rnd 函数返回小于 1 但大于或等于 0 的值。
如比一条题目说0-100的随机数,这其中包不包括0或100呢,怎么才能准确理解题目。

解决方案 »

  1.   

    0-100 的随机数,一般意思上是指包括1和100的.
    100以内的正数,一般意思上指1-100.
    不过这些题目都出得不严格,严格一点的如:两位正整数.
    取数的范围,用:
    int(rnd(大数-小数+1))+小数
    来求.
      

  2.   

    rnd * 100 ,取值范围为 0 -- 100
    要取值1 -- 100, 写成: (100-1)*rnd +1
      

  3.   

    Bmin=最小值
    Bmax=最大值
    (Bmax > Bmin)N = Int(Rnd * (Bmax - Bmin + 1)) + Bmin
      

  4.   

    试了下负数也支持,不错
    Private Sub Command1_Click()
    Debug.Print GetRndBetween(-5, 99)
    End SubFunction GetRndBetween(Bmin, Bmax)
    GetRndBetween = Int(Rnd * (Bmax - Bmin + 1)) + Bmin
    End Function
      

  5.   

    '┏〓〓〓〓〓〓〓〓〓 GetRndBetween,start 〓〓〓〓〓〓〓〓〓┓
    '[简介]:
    '获取界于数1和数2之间的随机数
    Function GetRndBetween(Number1, Number2)
       '[mycode_id:2054],edittime:2011-9-20 上午 11:33:01
           Randomize Timer + Rnd * 10 '重设随机数因子
           GetRndBetween = Int(Rnd * (Number2 - Number1 + 1)) + Number1
    End Function
    '┗〓〓〓〓〓〓〓〓〓  GetRndBetween,end  〓〓〓〓〓〓〓〓〓┛