欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片



Randomize 語(yǔ)句

初始化隨機(jī)數(shù)生成器。

Randomize [number]

number 參數(shù)可以是任何有效的數(shù)值表達(dá)式。

說(shuō)明

Randomize 使用 number 參數(shù)初始化 Rnd 函數(shù)的隨機(jī)數(shù)生成器,賦給它新的種子值。如果省略 number,則使用系統(tǒng)計(jì)時(shí)器返回的值作為新的種子值。

如果不使用 Randomize,則第一次調(diào)用 Rnd 函數(shù)(無(wú)參數(shù))時(shí),它將使用相同的數(shù)字作為種子值,隨后使用最后生成的數(shù)值作為種子值。

注意 要重復(fù)隨機(jī)數(shù)的序列,請(qǐng)?jiān)谑褂脭?shù)值參數(shù)調(diào)用 Randomize 之前,立即用負(fù)值參數(shù)調(diào)用 Rnd。使用相同的 number 值的 Randomize 不能重復(fù)先前的隨機(jī)數(shù)序列。

下面例子舉例說(shuō)明如何使用 Randomize 語(yǔ)句:

Dim MyValue, Response
Randomize '初始化隨機(jī)數(shù)生成器。
Do Until Response =vbNo MyValue =Int((6 * Rnd) + 1)' 產(chǎn)生 1  6 之間的隨機(jī)數(shù)。
 MsgBox MyValue Response =MsgBox ("Roll again? ", vbYesNo)Loop

要求

版本 1

請(qǐng)參閱

Rnd 函數(shù) | Timer 函數(shù)

返回首頁(yè)