Network Security Internet Technology Development Database Servers Mobile Phone Android Software Apple Software Computer Software News IT Information

In addition to Weibo, there is also WeChat

Please pay attention

WeChat public account

Shulou

How to write code to achieve a 15-minute reminder

2025-03-30 Update From: SLTechnology News&Howtos shulou NAV: SLTechnology News&Howtos > Development >

Share

Shulou(Shulou.com)06/03 Report--

This article mainly explains "how to write code to achieve a 15-minute reminder". The content in the article is simple and clear, and it is easy to learn and understand. let's study and learn how to write code to achieve a 15-minute reminder.

Save as .vbs

The code is as follows:

Today=Date ()

Years=DatePart ("yyyy", today)-1981-1

Days=DatePart ("y", today) + 25

If DatePart ("m", today) = 12 Then

If DatePart ("d", today) > = 9 Then

MsgBox "ok"

Years=Years+1

Days=DatePart ("d", Date)-9

End if

End If

MsgBox "AT ^" & Years & "C!" & Days& "D ^ SPACE-TIME!", 4096 / 64, "prompt"

Set wshshell=CreateObject ("WScript.Shell")

Do

WScript.Sleep 900000

Getstr=MsgBox ("15 minutes have passed!", 4097, ".")

If getstr=vbCancel Then

Wshshell.Popup "Bye-Bye!", 2, ".!"

WScript.Quit

End If

Loop

Thank you for your reading. the above is the content of "how to write code to achieve a 15-minute reminder". After the study of this article, I believe you have a deeper understanding of how to write code to achieve a 15-minute reminder. Specific use also needs to be verified by practice. Here is, the editor will push for you more related knowledge points of the article, welcome to follow!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.

Views: 0

*The comments in the above article only represent the author's personal views and do not represent the views and positions of this website. If you have more insights, please feel free to contribute and share.

Share To

Development

Wechat

© 2024 shulou.com SLNews company. All rights reserved.

12
Report