簡単に作成できる手順は↓
1.中身
```vb:TaskTimer.vbs dim input1,input2 input1=InputBox("[HH24ss]に提示メッセージを表示させるか?","時刻入力",FormatDateTime(time,vbLongTime)) input2=InputBox("提示メッセージ内容を書いてください。","メッセージ入力","一息を入れましょう! or 会議10分前!") WScript.Sleep DateDiff("s",FormatDateTime(time,vbLongTime),input1)*1000 msgbox input2,vbSystemModal,"Warning" ```簡易AlertTimer.vbs
ret1 = InputBox("[HH24:mm:ss]に次のAlert Messageを表示させます","※将来の時刻入力",FormatDateTime(time,vbLongTime))
ret2 = InputBox("Alert内容を記入てください。","メッセージ入力","一息を入れましょう! or 会議10分前!")
NewDate = DateDiff("s",FormatDateTime(time,vbLongTime),ret1)
WScript.Sleep NewDate*1000
MsgBox ret2,vbSystemModal,"★Alert"
2.外部ファイル作成
上記の中身を名前自由につける拡張子をvbsとする外部ファイルへ作成、保存。3.試行
作成ファイルをダブルクリックして実行※保存文字コードはSJISでOK、UTF-8はNG ※Windows7,10にて実行試験済み ※設定Alert時刻を将来時刻に設定するように(現時点以前にするとエラー発生してしまう)