[ASP ] 想寫個像樂透的程式但是遇到了瓶頸

看板Visual_Basic作者 (天冷心更冷)時間16年前 (2008/03/29 05:50), 編輯推噓2(201)
留言3則, 2人參與, 最新討論串1/5 (看更多)
我想寫個像樂透模式差不多的程式 但是沒辦法像樂透一樣6個號碼 在加一個特別號,我一直都很煩惱,請各位高手告訴我加上一個特別號要怎麼寫 程式碼如下 Module Module1 Sub Main() Dim i, n, x As Long Console.WriteLine("樂透") For i = 1 To 6 Randomize() n = Int(Rnd() * 42) Console.WriteLine("中獎號碼" & n) Next Console.ReadLine() End Sub End Module -- -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.192.227.150

03/29 13:09, , 1F
i=1 to 7不就好了~@@?只是要注意n=Int(Rnd()*42)會取到重複
03/29 13:09, 1F

03/30 03:37, , 2F
想偷問一下...原PO是哪個學校的~"~
03/30 03:37, 2F

03/30 03:37, , 3F
這題目是我昨天的作業....XD
03/30 03:37, 3F
文章代碼(AID): #17xMW_EI (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #17xMW_EI (Visual_Basic)