用vb做倒计时器，怎样在最后10秒发出警示音
答案:3 悬赏:30 手机版
解决时间 2021-02-03 15:26
- 提问者网友：听门外雪花风
- 2021-02-03 06:57
用vb做倒计时器，怎样在最后10秒发出警示音
最佳答案
- 五星知识达人网友：野慌
- 2021-02-03 08:34
if 倒计时<10 Then Beep
全部回答
- 1楼网友：蓝房子
- 2021-02-03 11:15
在最后十秒播放一个长度为十秒的警示音频文件。
- 2楼网友：春色三分
- 2021-02-03 09:40
在窗体上画一个timer控件、一个按钮，一个progressbar控件（需要添加部件microsoft windows
common controls 6.0），用下面的代码，单击按钮开始10秒倒计时。
private sub command1_click()
timer1.enabled = true
progressbar1.value = progressbar1.max
end sub
private sub form_load()
timer1.enabled = false
timer1.interval = 1000
progressbar1.value = progressbar1.max
end sub
private sub timer1_timer()
progressbar1.value = progressbar1.value - 10
if progressbar1.value <= 0 then
timer1.enabled = false
msgbox "10秒倒计时结束！"
end if
end sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯