如何使Windows每小时大声说出超时

It’s easy to lose track of time when you’re working at your computer. Using time-tracking apps can help you figure out where the hours went, but for some, hearing the time spoken out loud can help keep track of time.

While macOS has a time announcement feature built in, there’s nothing like this in Windows. Luckily, you can add it yourself in just a few moments.

如何使Windows大声说出超时时间

  • Open Notepad or another text editor and paste the following:
    Dim speaks, speechhour_now=hour(time)if hour_now > 12 or hour_now = 12 Thenhour12 = hour_now - 12ampm = "PM"Elsehour12 = hour_nowhourfinal = hour_nowampm = "AM"End IfIf hour12 = 10 Thenhourfinal = "Ten"Elseif hour12 = 11 Thenhourfinal = "Eleven"Elseif hour12 = 12 Thenhourfinal = "Twelve"Elseif hour12 = 0 Thenhourfinal = "Twelve"Elseif hour12 > 0 and hour12 < 10 Thenhourfinal = hour12End Ifspeaks = "It is " & hourfinal & " o clock " & ampmSet speech=CreateObject("sapi.spvoice")speech.Speak speaks
  • 将其保存到方便的位置。随便命名文件(也许 TimeAnnounce ),但要确保文件以 .vbs (Visual Basic脚本)结尾。
  • 键入任务计划程序进入“开始"菜单,以打开任务计划程序实用程序。
  • 从菜单栏中选择操作>创建任务
  • 输入任务的名称,例如宣布时间
  • 切换到触发器标签,然后点击新建按钮。
  • 确保已选择一次。在开始旁边,选择今天的日期,然后选择下一个小时的开始。例如,如果是上午10:37,请选择 11:00:00
  • 选中每隔重复一次任务的框,然后选择 1小时。选择无限地旁边的,然后单击确定按钮。
  • 切换到操作标签,然后点击新建。单击程序/脚本框旁边的浏览,找到之前创建的VBS文件。
  • 单击确定,您将创建了您的任务。您会在每小时的顶部听到默认的语音合成语音提示。
  • 无论采用哪种方法,都应考虑采取一些方法来确保达到时间管理目标。

    标签: Windows任务计划程序 Windows技巧