如何设置 Sleep 的区间值?比如我要设置的 Sleep 的值如下:Sleep 100
Sleep 211
Sleep 200
Sleep 111
Sleep 200
........我想把上面的 Sleep 都成 Sleep i ,而i的值是个区间值,比如 100~300 之间取随机值,,,不知道代码要如何写....当然Sleep 的个数是不确定的......

解决方案 »

  1.   

    randomvalue = CInt(Int((upperbound - lowerbound + 1) * Rnd() + lowerbound))
      

  2.   

    因为 Sleep 的个数有几十个那么多,我想只修改一个语句i=int(rnd*200)+100而使下面的每个i在运行前都取一次随机值,这样修改不用一个个去修改指定付给他的值.比如我用2楼的代码如下:i=int(rnd*200)+100
    Sleep i
    Sleep i
    Sleep i
    Sleep i
    Sleep i结果上面的i值都是同一个值,不是我想要的...如果代码写成下面的代码的话,和我一个个修改 Sleep 的值有什么区别,并且代码量还大了.i=int(rnd*200)+100
    Sleep i
    i=int(rnd*200)+100
    Sleep i
    i=int(rnd*200)+100
    Sleep i
    i=int(rnd*200)+100
    Sleep i
    i=int(rnd*200)+100
    Sleep i
      

  3.   

    不知道有什么方法可以修改一个区间范围,可以使下面的 Sleep 在取 i 值前都可以从新的取一次,而不是取下来的值都是一样的.
      

  4.   

    取随机值前先要用randomize初始化
      

  5.   


    Private Sub Form_Load()
      Randomize Timer
    End SubPrivate Sub Command1_Click()
    Sleep i
    Sleep i
    Sleep i
    Sleep i
    Sleep i
       
    End SubPrivate Function i() As Integer
        i = Int(Rnd * 200) + 100
    End Function
      

  6.   

    dim lngD as long 
    randomize
    lngD=Clng(RND*200)+100
    Sleep lngD
      

  7.   

    当然有意义才弄的,上个Sleep的时间的间隔要经常测试要改变大小,如果每次都修改上百个Sleep不是很头疼?