[.NET] 兩個1-6的骰子

看板Visual_Basic作者 (§~~老郭郭~~§)時間19年前 (2006/06/05 20:33), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串1/2 (看更多)
我用 Dim g1, g2 As Double Randomize(1) g1 = Int(Rnd(10) * 7) g2 = Int(Rnd(8) * 7) Label1.Text = g1 Label2.Text = g2 End Sub 是有做出來... 但它會跑出0來啊.... 我依照書寫的1-100一樣畫葫蘆...不行... 1-100就不會有0....骰子為啥會呢? 我是新手...麻煩告訴我時請詳細點... 謝謝你了 -- http://www.comic.com.tw/mini02/ Taiwan 2ch 歡迎光臨 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.168.148.60

06/06 13:24, , 1F
g1 = Int(Rnd(10) * 5)+1 試試看 ^^
06/06 13:24, 1F
文章代碼(AID): #14X2IeJ7 (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #14X2IeJ7 (Visual_Basic)