以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]怎么返回当前时间  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24040)
--  作者：飘过西北
--  发布时间：2012/9/27 21:32:00
--  [求助]怎么返回当前时间
知道可以用now,但是我想用一个判断函数，例如：21：30=当前时间，给出一个对话框，相当于倒计的功能，但是怎么都不能判断正确，郁闷！
--  作者：狐狸爸爸
--  发布时间：2012/9/27 21:51:00
--  

Dim dt As Date = date.Now
If dt.Hour = 9 AndAlso dt.Minute = 30 Then
        messagebox.show("时间到了","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If