我有一个为我的客户工作的项目,现在我正在尝试使我的许可系统更先进,我想在软件中添加一个检查。
我想要的是当我的客户正在处理我的软件和计算机时钟显示时间(e.g. 12:00)
我想打开WinForms
之一以检查用户拥有的在线许可证。
我认为这可能很容易制作,但由于我不想在我的代码中使用Timers
并使我的软件工作得更慢,所以我现在在我自己的代码中堆栈。
这就是我现在尝试过的:
Dim day As String = Format(Today, "dddd")
Dim time As Date
Dim CurrHour As Integer
Dim CurrMinute As Integer
Dim CurrSecond As Integer
time = My.Computer.Clock.LocalTime 'Ive tried to use DateTime.Now here
CurrHour = time.Hour ' Get current hour value
CurrMinute = time.Minute ' Get current minute value
CurrSecond = time.Second ' Get current second value
If CurrHour = 12 AndAlso CurrMinute = 0 AndAlso CurrSecond = 30 Then
MsgBox("12 hours 0 minutes 30 seconds")
Else
Exit Sub
End If
End Sub
除了使用Timer.Tick
以使其正常工作之外,还有其他方法吗?