討論串[ASP ] 想寫個像樂透的程式但是遇到了瓶頸
共 5 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓2(2推 0噓 1→)留言3則,0人參與, 最新作者karta2506968 (天冷心更冷)時間16年前 (2008/03/29 05:50), 編輯資訊
1
0
0
內容預覽:
我想寫個像樂透模式差不多的程式. 但是沒辦法像樂透一樣6個號碼. 在加一個特別號,我一直都很煩惱,請各位高手告訴我加上一個特別號要怎麼寫. 程式碼如下. Module Module1. Sub Main(). Dim i, n, x As Long. Console.WriteLine("樂透").
(還有34個字)

推噓1(1推 0噓 1→)留言2則,0人參與, 最新作者xtimer時間16年前 (2008/03/30 11:45), 編輯資訊
0
0
0
內容預覽:
我給你我寫的. 不過我寫的是大樂透. 49取7. -----------------------------------------------------------. Module Module1. Sub Main(). Dim i%, y%, y1%, y2%, y3%, y4%, y5%,
(還有2932個字)

推噓1(1推 0噓 1→)留言2則,0人參與, 最新作者slanla (slanla)時間16年前 (2008/03/30 13:35), 編輯資訊
0
0
0
內容預覽:
來個提示好了. 假設要取1~5 3個不重複的數字. 1.首先設一陣列大小為5內容為1,2,3,4,5. 2.設一計數器值為5,表示還有5個球沒拿. 3.取一亂數0~5,假設為1. 4.交換位置4與1,並將計數器設為4,表示還有4個球沒拿. 此時陣列內容為1,5,3,4,2. 5.取一亂數0~4,假設
(還有66個字)

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者fumizuki (矇面加菲獅)時間16年前 (2008/03/30 13:40), 編輯資訊
0
0
0
內容預覽:
這標題用錯了喔,應該用[.NET]比較適合.... 而且是「主控台應用程式」專案. 不過我以「Windows應用程式」專案為例. 要用主控台的就把MsgBox()置換成Console.Write(). Private Sub btn_Click(ByVal sender As System.Obje
(還有1166個字)

推噓2(2推 0噓 1→)留言3則,0人參與, 最新作者yauhh (姚呵呵)時間16年前 (2008/04/01 01:38), 編輯資訊
0
0
0
內容預覽:
前面講的取球法若覺得不好寫,. 可以用洗牌法簡單做出來.. dim ar(41) as integer, i as integer. for i = 0 to 41. ar(i) = i+1. next i. randomize(). for i = 1 to 400. dim x as integ
(還有119個字)
首頁
上一頁
1
下一頁
尾頁