找回密碼 或 安全提問
 註冊
|註冊|登錄

伊莉討論區

搜索
請尊重及感激所有版主付出和奉獻尊貴會員無限使用任何功能儲值後自動升級用戶組
中文新竹銀魂母乳mg鬼滅之刃流出
中土windows 會聲會影萬華英k子と病奥森ボcad 2016

休閒聊天興趣交流學術文化旅遊交流飲食交流家庭事務PC GAMETV GAME
熱門線上其他線上感情感性寵物交流家族門派動漫交流貼圖分享BL/GL
音樂世界影視娛樂女性頻道潮流資訊BT下載區GB下載區下載分享短片
電腦資訊數碼產品手機交流交易廣場網站事務長篇小說體育運動時事經濟
上班一族博彩娛樂

✡ 斗破蒼穹 年番/鬥

[繁]狼與辛香料 MERCH

(4月新番)[繁]無職轉

(4月新番)[繁]怪異與

[繁]轉生貴族憑鑑定技

[繁]怪物轉生 Re:Mons
C & C++ 語言C# 語言Visual Basic 語言PHP 語言JAVA 語言
查看: 1586|回復: 0
打印上一主題下一主題

[原創]VB2012 - 亂數產生方式 & 範例 (含註解)[複製鏈接]

Rank: 2Rank: 2

帖子
612
積分
232 點
潛水值
23171 米
跳轉到指定樓層
樓主
發表於 2012-11-4 09:23 PM|只看該作者|倒序瀏覽
本帖最後由 ssas1115577 於 2012-11-4 09:37 PM 編輯

在以往,想要產生亂數的標準公式是:「Int((max - min + 1) * Rnd + min)」


但現在在VB.NET 中,想要產生亂數有了新方式,首先我們要先建立一個亂數產生器:

  1. Dim ran As New Random
複製代碼


然後就可以使用他的方法,舉例來說,想要令一個變數X 是0~9 的亂數,那麼程式碼可以這樣打:
  1. Dim ran As New Random
  2. Dim x As Integer
  3. x = ran.Next(0, 10)
複製代碼


Next 就是傳回指定範圍內的亂數,公式是:「Random.Next(min, max + 1)」
===============================================================================================

明白了VB.NET 新亂數的產生方式,這裡就提供各為一個範本,內容為亂數產生器,之前有人發出了VB6 的版本,但我想既然已經來到了VB.NET,不如就使用.NET 的新方式吧。

SRC 開放下載:
下載: 訪客無法瀏覽下載點,請先 註冊登入會員


備份載點(伊莉附件,下載積分-1 點):

...
瀏覽完整內容,請先 註冊登入會員
附件: 你需要登錄才可以下載或查看附件。沒有帳號?註冊
分享分享0收藏收藏0支持支持0
所有積分大於負-100的壞孩子,將可獲得重新機會成為懲罰生,權限跟幼兒生一樣。

使用道具檢舉

您需要登錄後才可以回帖 登錄 | 註冊

Powered by Discuz!

© Comsenz Inc.

重要聲明:本討論區是以即時上載留言的方式運作,對所有留言的真實性、完整性及立場等,不負任何法律責任。而一切留言之言論只代表留言者個人意見,並非本網站之立場,用戶不應信賴內容,並應自行判斷內容之真實性。於有關情形下,用戶應尋求專業意見(如涉及醫療、法律或投資等問題)。 由於本討論區受到「即時上載留言」運作方式所規限,故不能完全監察所有留言,若讀者發現有留言出現問題,請聯絡我們。有權刪除任何留言及拒絕任何人士上載留言,同時亦有不刪除留言的權利。切勿上傳和撰寫 侵犯版權(未經授權)、粗言穢語、誹謗、渲染色情暴力或人身攻擊的言論,敬請自律。本網站保留一切法律權利。
回頂部