文件名称：简单摇骰子游戏
文件大小：3KB
文件格式：ZIP
更新时间：2018-11-20 08:39:30
VB 代码
Dim a As Integer Option Explicit Private Sub Command1_Click() Command2.Enabled = False Command3.Enabled = True Command4.Enabled = False End Sub Private Sub Command2_Click() Command1.Enabled = False Command3.Enabled = True Command4.Enabled = False End Sub Private Sub Command3_Click() Command1.Enabled = False Command2.Enabled = False Command4.Enabled = True Timer1.Enabled = True End Sub
【文件预览】：
掷骰子VB
----掷骰子工程1.vbp(568B)
----Form1.frm(12KB)
----掷骰子工程1.vbw(50B)