Dim firstPrize As Integer = 3 Dim secondPrize As Integer = 5 Dim thirdPrize As Integer = 12 Dim souvenirPrize As Integer = 10 #39定義變量，存儲(chǔ)抽獎(jiǎng)結(jié)果 Dim firstPrizeList As New ListOf IntegerDim second。

因此，我們可以生成一個(gè)09之間的隨機(jī)數(shù)，如果這個(gè)隨機(jī)數(shù)等于0，就表示中獎(jiǎng)了具體代碼如下var probability = 10 中獎(jiǎng)概率為10%var randomNum = MathfloorMathrandom * 10if randomNum === 0。

print#39獲得3個(gè)二等獎(jiǎng)是 %s %s %s#39，e2_1，e2_2，e2_3#下面依次類推可以設(shè)置三等獎(jiǎng)的抽獎(jiǎng)024 改進(jìn)版 上面的那個(gè)初級(jí)版，假如要設(shè)置個(gè)三等獎(jiǎng)一百名那么將要重新維護(hù)幾百行代碼，下面。

Dim a1 To 100 As String Dim i As Integer， x As Integer Const n = 3 #39n的值可根據(jù)實(shí)際需要賦予不同的變量 Private Sub Command1_ClickTimer1Enabled = True End Sub Private Sub Command2_ClickTimer。

雙擊號(hào)碼停止按鈕，輸入代碼為Timer1Enabled = False，起到的作用是觸發(fā)器停止工作雙擊號(hào)碼重置按鈕輸入代碼為L(zhǎng)abel1Caption = #340#34，起到的作用是每次號(hào)碼滾動(dòng)后都要重新置0讓每次抽獎(jiǎng)的起始都是一樣的。

在窗體上添加一個(gè)command1，一個(gè)timer1，label10~5控件數(shù)組添加一個(gè)label1，然后再?gòu)?fù)制5個(gè)，共6個(gè)，用來顯示數(shù)字，代碼如下Private Sub Command1_ClickIf Command1Caption = quot抽獎(jiǎng)quotThen Command1Caption =。

你的要求無法完成實(shí)現(xiàn)，但抽獎(jiǎng)還是可以用EXCEL進(jìn)行的，如下1在SHEET1里面A1D10寫上你的獎(jiǎng)品，隨機(jī)寫 2在SHEET2里面A1D10涂成綠色，打上邊框，之后在SHEET2里面A12輸入公式 =Sheet1！A12 3復(fù)制SHEET2里面的。

代碼如下，已測(cè)試通過int mainint no，retprintfquot請(qǐng)輸入你猜測(cè)的號(hào)碼\nquotscanfquot%dquot，noret=rand%10printfquot本次開獎(jiǎng)結(jié)果=%d\nquot，retifno==retprintfquot恭喜你猜中了，中獎(jiǎng)10元\。

public class 抽獎(jiǎng)游戲 extends JFrame static 抽獎(jiǎng)游戲 frame public 抽獎(jiǎng)游戲 setLayoutnew GridLayout3， 3， 3， 3 Border border = new LineBorderColorBLUE， 4 JButton l1 = new JButton JButton。

只要在窗體中做二個(gè)命令按鈕一個(gè)標(biāo)簽和一個(gè)定時(shí)器對(duì)象，復(fù)制以下代碼，就可以運(yùn)行了Private Sub Command1_ClickIf Command1Caption = quot開始quot Then Command1Caption = quot暫停quotTimer1Enabled = True Else Command1。

1~36個(gè)數(shù)取7個(gè)不同的，需要用while循環(huán)+隨機(jī)數(shù)去取出7個(gè)數(shù)在while循環(huán)里面，可以判斷取出來的數(shù)用switch，是否是28，18，8 如果有輸出相應(yīng)的獎(jiǎng)項(xiàng)，如果沒有，就輸出其它的然后將這7個(gè)數(shù)，打印出來就好了JavaScr。

3先判斷用戶是否已登陸是否存在會(huì)員卡 詢問是否進(jìn)行抽獎(jiǎng)，選Y，電腦隨機(jī)輸出5個(gè)4位 數(shù)字如果其中有一個(gè)數(shù)字與用戶卡號(hào)相同，則為中獎(jiǎng)，獎(jiǎng)勵(lì) 人民幣為卡號(hào)數(shù)字的金額否則，謝謝參與程序退出 *import。

這個(gè)我沒怎么考，具體多少不太清楚，但是給的不少\x0d\x0a4登錄翻牌抽獎(jiǎng)\x0d\x0a每日登錄都可以抽獎(jiǎng)，偶爾會(huì)抽到監(jiān)本印文，一般是10個(gè)，連續(xù)登陸5天可以抽獎(jiǎng)獎(jiǎng)品更大點(diǎn)，監(jiān)本是50個(gè)，不過這個(gè)看運(yùn)氣了，有時(shí)候會(huì)抽。

這里是提問和回答用的寫的時(shí)候遇到什么困難可以問的用隨機(jī)數(shù)，抽中一個(gè)就不要再次抽中同樣的號(hào)碼，就可以了。

可以借助隨機(jī)函數(shù)，比如說你一共有100個(gè)人，你可以rand%100，這樣可以認(rèn)為100個(gè)人是等概率的。