找回密码
 加入网盟
分割线
官方精品推荐
AutoIt3实现了产生随机数的算法,封装成函数_Random()后提供使用,通过调用该函数产生一定范围的随机数。
  1. MsgBox(64, "随机数", _Random(1))  
  2. MsgBox(64, "随机数", _Random(10))   
  3. MsgBox(64, "随机数", _Random(100))   
  4. MsgBox(64, "随机数", _Random(1000))   
  5. MsgBox(64, "随机数", _Random(10000))   
  6.    
  7. ;;产生随机数函数  
  8. Func _Random($nNum1 = 0, $nNum2 = 0, $iFlag = 0)  
  9.     ; Invalid 1st parameter  
  10.     If Not IsNumber($nNum1) Then Return SetError(1, 0, 0)   
  11.     Switch @NumParams  
  12.         Case 0  
  13.             Return Random()  
  14.         Case 1  
  15.             If $nNum1 < 0 Then Return -Random(-$nNum1)  
  16.             Return Random($nNum1)  
  17.         Case Else  
  18.             ; Invalid 2nd or 3rd parameter  
  19.             If Not IsNumber($nNum1) Or ($iFlag <> 0 And $iFlag <> 1) Then Return SetError(2, 0, 0)   
  20.             If $nNum1 = $nNum2 Then Return $nNum1  
  21.             If $nNum2 > $nNum1 Then Return Random($nNum1, $nNum2, $iFlag)  
  22.             Return Random($nNum2, $nNum1, $iFlag)  
  23.     EndSwitch  
  24. EndFunc  
复制代码
分享至 : QQ空间
收藏

4 个回复

倒序浏览
kkkccc 列兵 2020-10-13 23:33:22
2#
非常感谢
回复 使用道具 举报
flybox 列兵 2020-10-13 23:49:22
3#
奥利给
回复 使用道具 举报
感谢{author}楼主
回复 使用道具 举报
膜拜大神3秒钟
回复 使用道具 举报
您需要登录后才可以回帖 登录 | 加入网盟
关闭

华夏网盟推荐 上一条 /1 下一条