內件函式-亂數

張貼日期：Apr 24, 2013 1:53:18 AM

一、Rnd()

• 產生一個<1的隨機小數亂數

• 應用：產生一個範圍A~B的隨機整數

  • dim n as integer

  • n=Int(Rnd()*(B-A+1))+A

• ex. n=Int(Rnd()*(41))+30 '產生30~70間的亂數

二、Randomize()

• • 讓Rnd()產生新的種子，打亂亂數序列

  • 應用：

for i=1 to 20

Randomize() '在Rnd()之前使用Randomize，避免亂數使用同一序列而非真正"亂數"

n=Int(Rnd()*(41))+30

next i

'讓每次亂數使用不同序列