[VB6 ] 井字遊戲的勝負判定

看板Visual_Basic作者時間17年前 (2008/05/16 22:15), 編輯推噓4(407)
留言11則, 5人參與, 最新討論串1/6 (看更多)
我用的是VB2005版本 作業是寫出一個井字遊戲 (OOXX那個~@@) 遊戲本身我已經寫好了 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click x = x + 1 Button1.Enabled = False If x Mod 2 = 1 Then Button1.Text = "O" Else Button1.Text = "X" End If End Sub 分別為Button1~9 可是要怎麼判別 147 258 369 123 456 789 159 357的text相同 就跳出一個label說該text玩家贏了呢? 懇求提點 謝謝各位 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.143.32.124

05/16 22:36, , 1F
你可以試試用二維陣列記錄玩的情形
05/16 22:36, 1F

05/16 22:40, , 2F
呃...怎麼試...= =||
05/16 22:40, 2F

05/16 22:40, , 3F
因為作業只要以上就完成了 判定勝負還沒教 單純是有做加分
05/16 22:40, 3F

05/16 22:40, , 4F
所以....我不會.....@@ 完全沒頭緒...(汗顏)
05/16 22:40, 4F

05/17 00:48, , 5F
我被標題分類騙進來了囧"
05/17 00:48, 5F

05/17 01:05, , 6F
在ox指定之後,就要判斷{1,2,3},{1,4,7},{1,5,9},{2,5,8}...
05/17 01:05, 6F

05/17 01:07, , 7F
等,看o或x哪一項連佔三個位置,就是哪邊勝
05/17 01:07, 7F

05/17 01:09, , 8F
以你的ButtonX配置,把八條線的判斷都寫一次是最基本的方法;
05/17 01:09, 8F

05/17 01:11, , 9F
要快的話,宣告一個二維陣列,把ButtonX都指定到二維陣列各格,
05/17 01:11, 9F

05/17 01:11, , 10F
然後用陣列方式寫判斷,程式會比較短
05/17 01:11, 10F

05/17 18:39, , 11F
你自己拿筆畫 怎麼樣的情形才會贏 井字遊戲不會沒玩過吧
05/17 18:39, 11F
文章代碼(AID): #18BPRe9V (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #18BPRe9V (Visual_Basic)