Il est facile de perdre la notion du temps lorsque vous travaillez sur votre ordinateur. L'utilisation d'applications de suivi du temps peut vous aider à comprendre où les heures se sont écoulées, mais pour certains, entendre l'heure prononcée à haute voix peut aider à garder une trace du temps.
Alors que macOS a une fonction d'annonce de l'heure intégrée, il n'y a rien de tel dans Windows. Heureusement, vous pouvez l'ajouter vous-même en quelques instants.
Dim speaks, speech
hour_now=heure(heure)
si hour_now> 12 ou hour_now =12 Alors
heure12 =heure_maintenant - 12
ampm ="PM"
Autre
heure12 =heure_maintenant
heurefinale =heure_maintenant
ampm ="AM"
Fin si
Si heure12 =10 Alors
heure finale ="Dix"
Sinon heure12 =11 Alors
heure finale ="Onze"
Sinon heure12 =12 Alors
heure finale ="Douze"
Sinon heure12 =0 Alors
heure finale ="Douze"
Sinon heure12> 0 et heure12 <10 Alors
heurefinale =heure12
Fin si
parle ="Il est " &heure finale &" heure " &m
Set speech=CreateObject("sapi.spvoice")
speech.Speak parle
Quelle que soit votre méthode, vous devriez envisager des moyens de vous assurer d'atteindre vos objectifs de gestion du temps.