如何在时间到时引发某一个事件？

[jalaihh]

一个考试系统,我希望程序到点时自动结束,我如何来触发这一事件？

[vesion]

用个timer控件计时。

[晓轩]

[Quote=引用 1 楼 vesion 的回复:]
用个timer控件计时。
[/Quote]
获得系统当前时间datetime.now
在timer的事件里添加计数器。
监视系统时间与timer内的计数器。
对比这两个时间datediff，当到达预期时间后触发你的事件

[jalaihh]

在TIME_TICK中判断时间是否到就行吗？

[晓轩]

恩，是的

[herol]

[Quote=引用 2 楼 xiaoxuanZhu 的回复:]
引用 1 楼 vesion 的回复:
用个timer控件计时。

获得系统当前时间datetime.now
在timer的事件里添加计数器。
监视系统时间与timer内的计数器。
对比这两个时间datediff，当到达预期时间后触发你的事件
[/Quote]

[syeerzy]

考虑问题都不注意的....2楼误导并且引起下面都走了弯路.


直接在开始的时候计时器计时,把Interval设为考试时间长度的毫秒数就行了, 哪这么多事.


2楼的方案缺点 3 :
1 麻烦;
2 明明一次事件却要在几千个甚至更多次计时周期里做判断;
3 如果学生在考试要结束的时候修改自己机器的系统时间,则他可以拖后交卷........
4 如果所有学生都是在交卷的服务器上(如果有的话)获取时间的话,人数多会造成ServerLoading,因为假设你需要交卷的时间精确到1秒(1000毫秒..差不多了),则假设有100个学生一起考试,则服务器每分钟必须获取多少次系统时间(主要在TCP3次握手上的性能开销会很难受)

[llsus]

[Quote=引用 6 楼 syeerzy 的回复:]
考虑问题都不注意的....2楼误导并且引起下面都走了弯路.


直接在开始的时候计时器计时,把Interval设为考试时间长度的毫秒数就行了, 哪这么多事.


2楼的方案缺点 3 :
1 麻烦;
2 明明一次事件却要在几千个甚至更多次计时周期里做判断;
3 如果学生在考试要结束的时候修改自己机器的系统时间,则他可以拖后交卷........
4 如果所有学生都是在交卷的服务器上(如果有的话)获取时间的话,人数多会造成ServerLoading,…
[/Quote]

[nosort]

简单的就是最好的，支持楼上的syeerzy，不过这样设置会有个最长时间长度限制，超过？？多少小时好像就不行了
Private Sub StartExam()
Timer1.Interval = 3600000'一个小时
Timer1.Enabled = True
Timer1.Start()
End Sub


Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
MsgBox("交卷时间到！")
End Sub

[zwnylsf]

[Quote=引用 6 楼 syeerzy 的回复:]
考虑问题都不注意的....2楼误导并且引起下面都走了弯路.


直接在开始的时候计时器计时,把Interval设为考试时间长度的毫秒数就行了, 哪这么多事.


2楼的方案缺点 3 :
1 麻烦;
2 明明一次事件却要在几千个甚至更多次计时周期里做判断;
3 如果学生在考试要结束的时候修改自己机器的系统时间,则他可以拖后交卷........
4 如果所有学生都是在交卷的服务器上(如果有的话)获取时间的话,人数多会造成ServerLoading,…
[/Quote]