拉霸機VB2008求解...

又靜

您好，您第一個問題，我看不出您預設下注金額一開始都是10的程式碼在哪，所以在全部停止:button3
後面加了一行bitNum = 0 ，讓下注金額歸0

問題2: 您可以把Button2.Enabled = False 的屬性設為預設值，這樣就能解決沒下注也能拉霸的問題


小妹以您的程式小改了一下，您可以試看看

1.     '下注:button1，修改為score > 0 才能下注
   
2. 
   
3.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
   
4.         If score > 0 Then
   
5.             bitNum += 10
   
6.             Label_BitNum.Text = bitNum.ToString
   
7.             score -= 10
   
8.             Label_UserScoreNum.Text = score.ToString
   
9.             Button2.Enabled = True
   
10.         Else
    
11.             Button1.Enabled = False
    
12.         End If
    
13. 
    
14.     End Sub
    
15. 
    
16.     '開始拉霸:button2，改成有下注才能拉霸
    
17.     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    
18.         If bitNum > 0 Then
    
19.             Timer_Lucky1.Enabled = True
    
20.             Timer_Lucky2.Enabled = True
    
21.             Timer_Lucky3.Enabled = True
    
22.             Button1.Enabled = False
    
23.             Button2.Enabled = False
    
24.         End If
    
25. 
    
26.     End Sub
    
27. 
    
28.     '全部停止:button3
    
29.     Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    
30.         If Timer_Lucky1.Enabled Then
    
31.             PBox_Btn1.Enabled = False
    
32.             Timer_Lucky1.Enabled = False
    
33.         End If
    
34.         If Timer_Lucky2.Enabled Then
    
35.             PBox_Btn2.Enabled = False
    
36.             Timer_Lucky2.Enabled = False
    
37.         End If
    
38.         If Timer_Lucky3.Enabled Then
    
39.             PBox_Btn1.Enabled = False
    
40.             Timer_Lucky3.Enabled = False
    
41.         End If
    
42. 
    
43. 
    
44.         Restart()
    
45. 
    
46.         CheckLink()
    
47.         If score = 0 Then
    
48.             Button1.Enabled = False
    
49.             Button2.Enabled = False
    
50.             Button3.Enabled = False
    
51.             bitNum = 0
    
52.         Else
    
53.             Button1.Enabled = True
    
54.             Button2.Enabled = False
    
55. 
    
56.         End If
    
57. 
    
58.     End Sub

複製代碼

又靜

我是阿正 發表於 2012-1-31 20:01  
但是還是不行ㄟˊˋ 還是會直接 開始拉霸... 請問可以給個MSN 或及時通 傳給你檔案 幫忙改嗎??
上面的程式 ...

您好，
論壇版規禁止公開個人通訊資料
包括MSN或即時通
您有可以將檔上傳到網路空間嗎

又靜

我是阿正 發表於 2012-2-3 18:44  
重點是ˊˋ我不會弄 沒有上傳過東西 所以我不知道該怎麼要用

您好，您只寄 Lucky7_Client.sln 的方案檔
這個檔案為連結、資料之集合，不可只有此檔案
還要包含設定、程式....等一些檔案
您可以整個資料夾壓縮後再寄過來