用vb创建一个窗体，怎么倒计时，代码怎么写？

[此贴子已经被作者于2017-2-25 21:13编辑过]

放个定时器。
定时器设置为 1000 毫秒触发一次。
每运行一次，把当前值减掉1，当 当前值 <=0 是关闭窗体。

i=val(lable1)
i=i-1
lable1=i
if i<=0 then
  unload me
end if

Timer控件，既可以用他修改lable，也可以用它判断计数为0时关闭窗口。如何激活timer事件，就是你自己如何设想的问题了。
timer控件如何使用请自行百度，很简单的。

谢谢！！

i=val(lable1)
i=i-1
lable1=i
if i<=0 then
  unload me
end if

[此贴子已经被作者于2017-2-25 21:13编辑过]