- 高考中的时间多少分钟提醒一次?
- 高考最后的十五分钟的提示音是什么
- “距离考试结束还有15分钟”监考老师的话把我吓了一跳 150字扩写
- 怎样用VB做倒计时，如果说距离考试结束还有两个小时，要时分秒的
- 我要要一个大概内容为：‘距离考试结束还有15分钟“的音频文件 学校考试用
高考中的时间多少分钟提醒一次?
距离考试结束15分钟提醒一次，有的考场有表挂在墙上，语文提前40分钟提醒写作文。实在不行的你直接举手问老师就可以，这都允许，希望帮助你！
高考最后的十五分钟的提示音是什么
我们是监考老师说的:“距离考试结束还有15分钟”
“距离考试结束还有15分钟”监考老师的话把我吓了一跳 150字扩写
距离考试还有15分钟了，我的心紧张的砰砰乱跳，我向四周望了望，考生们都已经全部坐好了，有的在聊天，有的在抓紧的复习功课，有的竟然在剪指甲，好像都不是很紧张，只有我是控制不住的紧张啊。
后来考试开始了，监考老师开始发卷子，我拿到卷子一看，题目可真简单啊，绝对难不倒我，于是我开始想象，我这次成绩多好多好，老师怎样夸奖我，同学怎样羡慕我，妈妈怎样奖励我……唉，这可真把我乐坏了。
“拿到试卷后就抓紧做题，不要浪费时间！”监考老师猛地来这一句把我吓了一跳，我猛地从沉思中醒过来，果然发现监考老师正盯着我看，我吓得忙低下头，开始做题，再也不敢胡思乱想了。
怎样用VB做倒计时，如果说距离考试结束还有两个小时，要时分秒的
很容易！
建3个TEXT(分别显示时、分、秒)，1个定时器（设1秒），2个按钮（开始倒计时和退出）。
TEXT里分别写入预设的时间。如果是2小时，就分别写2、00、00。
定时器响应里：
秒-1，如果为负，置59，同时分钟位-1，....
类推。直至3个位都为0。
特意给你写个简单的代码，时间到有语音提示等，不管你信不信，反正我测试通过了。
Dim sec, min, h
Private Sub Command1_Click()
Timer1.Enabled = True
h = Text1.Text
min = Text2.Text
sec = Text3.Text
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
Form1.BackColor = &HFFFF00
Timer1.Enabled = False
Timer1.Interval = 1000
Text1.Text = 2
Text2.Text = "00"
Text3.Text = "00"
Command2.Caption = "退出"
Command1.Caption = "开始倒计时"
End Sub
Private Sub Timer1_Timer()
If sec > 0 Then
sec = sec - 1
Else:
If (min > 0 Or h > 0) Then
sec = 59
End If
If min > 0 Then
min = min - 1
Else:
If h > 0 Then
min = 59
End If
If h > 0 Then
h = h - 1
Else: Timer1.Enabled = False
CreateObject("SAPI.SpVoice").Speak "GAME OVER!"
Form1.BackColor = &HFF
End If
End If
End If
Text1.Text = h
Text2.Text = min
Text3.Text = sec
End Sub
怎么样？我专门写这么多代码，还调试半天，我容易吗？ 给个好评吧！
我要要一个大概内容为：‘距离考试结束还有15分钟“的音频文件 学校考试用
距离考试结束还有15分钟的音频文件，还有一个是大概内容为：考试已经结束 请大家交卷，希望你再说清楚点。
TAG： 距离
