豁达作文:求一种提醒人休息的应用程序,类似电铃那样隔一段时间就提醒人休息一下眼睛。

来源:百度文库 编辑:神马品牌网 时间:2024/05/04 05:36:00
有没有做成成品的那种?直接安装的?

有这种软件:(眼睛卫士 2.1 SP1):本软件专门为在电脑前工作起来就不要命的人设计。运行本软件后,在任务栏出现一图标,不妨碍任何工作。到达指定的时间时,计算机将锁定键盘、鼠标和屏幕,强迫您休息一段时间。锁定前将给您两次提醒。您可以自行设定一直工作的时间和休息时间。如果您在五分钟之内没有任何键盘鼠标输入,则认为您已经休息过一次。
本软件同时还是一款非常好用的定时关机软件。不但提供了常见的按设定时间关机(休眠)的功能,而且提供了新颖的闲置关机(休眠)功能。在您有事离开电脑而又忘记关闭电脑时,本软件会体贴的按您设置好的时间自动为您关机(休眠)。(此软件是免安装纯绿色软件,休息时还可自定义—段音乐放松下大脑,是个很不错的软件)
下载地址华军软件园:http://sq.onlinedown.net/soft/24450.htm

VB写的.
一个文本框用于设置时间, 一个按钮用于确定设置,一个计时器.

Private Sub Command1_Click()
MsgBox "计时开始!", , "提醒"
Me.Hide
Timer1.Enabled = True
Timer1.Interval = CInt(Text1.Text) * 1000
End Sub

Private Sub Form_Load()
Timer1.Enabled = False
Text1.Text = 5
End Sub

Private Sub Timer1_Timer()
MsgBox "时间到!", , "提醒"
Me.Show
Timer1.Enabled = False

End Sub