Question

vb设置五子棋游戏中如何加入倒计时器（10秒）

Answer 1

在窗口上随便丢个Timer1,设置其Interval =1000;Enabled =False
再在合适的位置放个Label1用来显示时间

这句放最前面声明那里:Public xxx As Long, yyy As Boolean
把下面代码贴进去:
Private Sub Timer1_Timer()
Dim a As String
xxx = xxx - 1
If xxx < 0 Then
a = IIf(yyy, "白", "黑")
MsgBox a & "棋超时判负"
'这里写超时判负的代码或函数
Timer1.Enabled =False
Else
Label1 = xxx
End If
End Sub
在开始下棋那个函数里加句 Timer1.Enabled =true:xxx=10:yyy=true
在每次下子画棋子的函数最后加句 xxx=10:yyy=not(yyy)

Answer 2

1.找一个多媒体控件
2.timer和函数一起折腾
我vb是高中选修的，楼主要问具体操作上编程论坛

Answer 3

1.找一个多媒体控件
2.timer和函数一起折腾
我vb是高中选修的，楼主要问具体操1.找一个多媒体控件
2.timer和函数一起折腾
我vb是高中选修的，楼主要问具体操作上编程论坛 作上编程论坛