关于Button的小小小问题！请各位帮忙看一下~~T_T
要求设计一个小游戏类似老虎机之类的，3个数字滚动，停止，有3个一样的就得奖之类的…… 汗
其中有一条要求
按下button1之后，数字开始滚动，button在三秒钟之内失效
Button1.Enabled = False
3秒之后 数字停止滚动 Button又能按了
这个应该怎么编呢…
（有提示用Timer）
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = True
Button1.Enabled = False
CurrentTime = Format(TimeValue(Now), "")
我只写到这里了…
学VB才一个月，所以想请各位大虾帮忙一下，伸出援手，小女子感激不尽~~~
PS.因为刚入门，学得很浅，所以最好是简单的，谢谢，谢谢，谢谢~~~
[解决办法]
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Button5.Enabled = False
Timer1.Enabled = True
Timer1.Interval = 500 '显示123用，每半秒换一次
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Static a, t As Int16
a = a + 1
t = t + 1
If a = 4 Then a = 1
Label1.Text = a
If t = 6 Then
t = 0
a = 0
Button5.Enabled = True
Timer1.Enabled = False
End If
End Sub
[解决办法]
数字显示按楼主的说法，应该采用随机数。显示三个数字。
If t = 6 Then
t = 0
a = 0
Button5.Enabled = True
Timer1.Enabled = False
'Todo
'是否数字一样的判断。
End If
