花之圆舞曲:Visual Basic中关于时间的编程

来源:百度文库 编辑:高考问答 时间:2024/04/29 15:15:41
1.在Visual Basic中,怎样的程序显示时间?
2.在Visual Basic中,怎样以时间为条件设置程序,例如,当时间为10:23时,输出"你好".
请写明具体程序.

Now() 返回日期 + 时间。
Date 存储当前日期。
Time 存储当前时间。
Weekday 存储当前星期数(0~7,星期日~星期六)
WeekdayName(WeekDay) 返回根据星期数生成的星期名,例如 WeekdayName(1) 返回"星期一"。

注意: 除了 Now 和 WeekdayName 是函数外,其他都是只读属性。

使用TIME控件实现捕获,使用TIME()函数生成生成时间,IF判断得到!

Private Sub Form_Load()
Timer1.Interval = 100 '设置timer1间隔
End Sub

Private Sub Timer1_Timer()
Form1.Caption = Time '在窗体上显示时间

If Time = "10:23:00" Then '当时间等于xx时
MsgBox "你好"
End If

End Sub