這次選手課的老師題目是...

樂透彩選號系統...= ="

恩...

功能麻,簡單說就是隨機取出六個數字,不重複...

以陣列方式caption在label上...

我為什麼...

解不出來呢...

他很機車...

把它改成,當a=b的時候,就得重新取一次...

偏偏會重複...

改成,當a<>b的時候,就重新取一次...

答案出來全部都是六個1,或六個2,六個一樣的數字...

怪怪的,為什麼=不能,<>功能卻正確...?

恩,VB運算部分大約是這樣


For i = 0 To 5

lottery(i) = Int(lott * Rnd + 1)

Next

For i = 0 To 5

While n < i

While lottery(n) = lottery(i)

lottery(i) = Int(lott * Rnd + 1)

Wend

n = n + 1

Wend

n = 0


誰能幫我除錯?弄兩天弄不出來...XD
arrow
arrow
    全站熱搜

    pkraichu 發表在 痞客邦 留言(2) 人氣()