VB程式~寫小遊戲~請問這個該如何寫?!(急!!)

Question

http://203.72.209.21/~judy/s952h/index.html

裡面的高二作業"三"
的小遊戲該如何做咧?
隨便挑一個
若需要圖片到時我自己會製作>"<
急需!!
萬分感謝!!

Answer 1

請你在螢幕上配置
Image1
Command1 - Caption 為 "擲骰子"
Command2 - Caption 為 "結束"
同時在你的程式的檔案夾裡要有 pic1.bmp ~ pic6.bmp
(六個骰子的圖)
Private Sub Command1_Click()
Dim n As Integer

Randomize
n = Int(Rnd() * 6) + 1
Print "number is " & n
Image1.Picture = LoadPicture("pic" & n & ".bmp")
End Sub
Private Sub Command2_Click()

End
End Sub
如果有問題, 請來函討論. 不然, 我可能會錯失你再補充的疑點.