PCDVD數位科技討論區
PCDVD數位科技討論區   註冊 常見問題 標記討論區為已讀

回到   PCDVD數位科技討論區 > 其他群組 > 七嘴八舌異言堂
帳戶
密碼
 

回應
 
主題工具
rogeryo
Regular Member
 

加入日期: Dec 2001
文章: 63
有關vb的問題

我想寫一個簡單的樂透程式~~
但是寫到亂數產生時卡住了
我不知道如何讓亂數都不同~~
我是設計7個文書格(6個號碼+特別號)
我想要讓第一個亂數在42個號碼選出時
第二個亂數會屏除第一個亂數,就是除了第一個以外的41個中選1個
第三則是屏除第一和第二個........
以此類推

不知道要怎ㄇ寫讓他跳過已經選出的號碼!!

另外不知道還有別的方法或程式可供小弟參考ㄇ!?
我在線上等各位高手解答~~
ICQ:17127988
     
      
舊 2002-08-27, 01:47 AM #1
回應時引用此文章
rogeryo離線中  
alecs
Major Member
 
alecs的大頭照
 

加入日期: Jul 2001
您的住址: TAIPEI
文章: 274
Re: 有關vb的問題

q:不知道要怎ㄇ寫讓他跳過已經選出的號碼!!
a:
Randomize
if a=b then b=int(rnd*100)



引用:
Originally posted by rogeryo
我想寫一個簡單的樂透程式~~
但是寫到亂數產生時卡住了
我不知道如何讓亂數都不同~~
我是設計7個文書格(6個號碼+特別號)
我想要讓第一個亂數在42個號碼選出時
第二個亂數會屏除第一個亂數,就是除了第一個以外的41個中選1個
第三則是屏除第一和第二個........
以此類推



另外不知道還有別的方法或程式可供小弟參考ㄇ!?
我在線上等各位高手解答~~
ICQ:17127988
 
舊 2002-08-27, 03:01 AM #2
回應時引用此文章
alecs離線中  
pets
Senior Member
 
pets的大頭照
 

加入日期: Jun 2001
您的住址: 綠島
文章: 1,371
Re: 有關vb的問題

引用:
Originally posted by rogeryo
我想寫一個簡單的樂透程式~~
但是寫到亂數產生時卡住了
我不知道如何讓亂數都不同~~
我是設計7個文書格(6個號碼+特別號)
我想要讓第一個亂數在42個號碼選出時
第二個亂數會屏除第一個亂數,就是除了第一個以外的41個中選1個
第三則是屏除第一和第二個........
以此類推

不知道要怎ㄇ寫讓他跳過已經選出的號碼!!

另外不知道還有別的方法或程式可供小弟參考ㄇ!?
我在線上等各位高手解答~~
ICQ:17127988

提一個簡單的概念~
用if迴圈去判斷此數是否已經出現過了...
假如出現過了,就再亂數一次...
假如未出現,就往下一個跑..以此類推..
不過,vb的內建函數可以產生不重複的數字吧~
__________________
武士:看來我不應該來。
紫霞:現在才知道太晚了,
武士:留下點回憶行不行?
紫霞:我不要回憶,要的話留下你的人。
武士:這樣只是得到我的肉體,並不能得到我的靈魂,我已經有愛人了,我們不會有結果,你讓我走吧。
紫霞:好,我讓你走,不過臨走前你要親我一下。
舊 2002-08-27, 08:16 AM #3
回應時引用此文章
pets離線中  


回應


POPIN
主題工具

發表文章規則
不可以發起新主題
不可以回應主題
不可以上傳附加檔案
不可以編輯您的文章

vB 代碼打開
[IMG]代碼打開
HTML代碼關閉



所有的時間均為GMT +8。 現在的時間是07:59 AM.


vBulletin Version 3.0.1
powered_by_vbulletin 2026。