VB.NET中為什么RND()前必須初始化RANDOMIZE

Randomize()的作用是初始化隨機數種子，

十載的東河網站建設經驗，針對設計、前端、開發、售后、文案、推廣等六對一服務，響應快，48小時及時工作處理。營銷型網站建設的優勢是能夠根據用戶設備顯示端的尺寸不同，自動調整東河建站的顯示方式，使網站能夠適用不同顯示終端，在瀏覽器中調整網站的寬度，無論在任何一種瀏覽器上瀏覽網站，都能展現優雅布局與設計，從而大程度地提升瀏覽體驗。創新互聯建站從事“東河網站設計”,“東河網站推廣”以來，每個客戶項目都認真落實執行。

它有個帶參數的版本

Randomize(double seed)

seed是產生隨機數序列的一個標號，如果你不調用Randomize改變這個標號，默認使用的是同一個序列，所以每次你啟動程序生成的隨機數都是相同的，不帶參數的Randomize等價于Randomize(Timer)，也就是使用系統時鐘作為隨機數種子

因為這個值隨程序啟動或調用每次都不會相同，所以能實現產生不同的隨機數

什么是vb的隨機數和種子??

VB的隨機數即使用Rnd函數生成的隨機數值。種子，為初始值，用來生成偽隨機數字。

Rnd 函數，返回一個包含隨機數值的 Single。

對最初給定的種子都會生成相同的數列，因為每一次調用 Rnd 函數都用數列中的前一個數作為下一個數的種子。

在調用 Rnd 之前，先使用無參數的 Randomize 語句初始化隨機數生成器，該生成器具有根據系統計時器得到的種子。

種子，為初始值，用來生成偽隨機數字。例如， Randomize 語句創建一種子值供 Rnd 函數使用，以接著創建唯一偽隨機數列。

Randomize 語句，初始化隨機數生成器。

說明

Randomize 用 number 將 Rnd 函數的隨機數生成器初始化，該隨機數生成器給 number 一個新的種子值。如果省略 number，則用系統計時器返回的值作為新的種子值。

如果沒有使用 Randomize，則（無參數的）Rnd 函數使用第一次調用 Rnd 函數的種子值。

Randomize 語句示例

本示例用 Randomize 語句初始化隨機數生成器。由于忽略了數值參數， 所以

Randomize 用 Timer 函數的返回值作為新的隨機數種子值。

Dim MyValue

Randomize ? ' 對隨機數生成器做初始化的動作。

MyValue = Int((6 * Rnd) + 1) ? ' 生成 1 到 6 之間的隨機數值。

《VB.NET》中的“Randomize(x)”和“Rnd(x)”

Rnd[(number)]

number

的值決定了

Rnd

生成隨機數的方式

如果

number

的值

Rnd

生成

小于

每次都使用

number

作為隨機數種子得到的相同結果。

大于

序列中的下一個隨機數。

等于

最近生成的數。

省略

序列中的下一個隨機數。

====================

先討論沒有加randomize時

X小于0

如

rnd(-1)

以-1為種的隨機數永遠相同

X大于0

如

rnd(1)

系統會先生成隨機數列表

有N個隨機數

你每執行一次rnd(1)就獲取列表中下一個隨機數

比如有這么個列表

程序開始時

得到0.7055475

執行第二次rnd(1)得到0.533424

第三次0.5795186

你關閉程序重新打開

第一次得到還是0.7055475

.7055475

.533424

.5795186

.2895625

.301948

而你說的X0

X0沒差別

是錯的

Print

Rnd(1)

Debug.Print

Rnd(-2)

和

Debug.Print

Rnd(-2)

Print

Rnd(1)

結果是不一樣的

X等于0

最近生成的數

一般為科學型數值

這個值也是不變的

rnd(x)

省略x不寫

就和X0

效果一樣

=========================

Randomize

用

number

將

Rnd

函數的隨機數生成器初始化，該隨機數生成器給

number

一個新的種子值。如果省略

number，則用系統計時器返回的值作為新的種子值。

如果沒有使用

Randomize，則（無參數的）Rnd

函數使用第一次調用

Rnd

函數的種子值。

注意

若想得到重復的隨機數序列，在使用具有數值參數的

Randomize

之前直接調用具有負參數值的

Rnd。使用具有同樣

number

值的

Randomize

是不會得到重復的隨機數序列的。

一般在使用rnd獲取隨機數

都是

randomize

int(rnd*(上限-下限+1）+下限)

這2個函數的X都是省略不寫

vb.net程序，利用隨機函數產生100個1到100之間的整數，求其中的最大最小值。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Randomize() '產生隨機數種子 以防止每次生成結果都一樣

Dim a(100) As Integer '聲明數組存放數據 用來保存隨機數結果

Dim max As Integer, min As Integer '聲明兩個變量存最大值和最小值

min = 1000 : max = 0 '設置初值

For i = 0 To 99 '循環100次

a(i) = Int(Rnd() * 1000 + 1) '用rnd生成一個隨機數 由于rnd范圍為0-1之間的小數.所以*1000設置他的范圍為0到999之間 加1變成1到1000之間

If a(i) = max Then max = a(i) '如果當前數值大于最大值的變量就保存

If a(i) = min Then min = a(i) '如果當前數值小于最小值的變量就保存

Next

MsgBox("最大值為" max)

MsgBox("最小值為" min)

End Sub

本文名稱：vb.net隨機種子 vb隨機數字的代碼
URL鏈接：http://vcdvsql.cn/article12/ddcohgc.html

成都網站建設公司_創新互聯，為您提供做網站、、網站導航、微信小程序、手機網站建設、網站制作

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯