读书人

VB中的Time,该如何解决

发布时间: 2012-02-04 15:43:08 作者: rapoo

VB中的Time
我想做了时间触发,当8:30时 让我的按钮显示出来
我是初学,请大家帮帮忙!

[解决办法]
If Format(Now, "HH:mm ") = "08:30 " Then
command1.Visible=True
End If
[解决办法]
凑凑热闹
楼上的代码放在
Private Sub Timer1_Timer()

End Sub
----
Timer1.Interval=60000 (时间间隔随意)
Timer1.Enabled=True
放在Form_Load或Button_Click中
[解决办法]
Private Sub Timer1_Timer()
If Format(Now, "HH:mm ") = "08:30 " Then
command1.Visible=True
End If
End Sub

[解决办法]
Private Sub Timer1_Timer()
If Format(Now, "HH:mm ") = "08:30 " Then
command1.Visible=True
End If
End Sub
[解决办法]
不好意思,记不清了应该是 FormatDateTime(Now, vbShortTime)
[解决办法]

凑凑热闹
Private Sub Timer1_Timer()
If Format(Now, "HH:mm ") = "08:30 " Then
command1.Visible=True
timer1.enabled = false '关闭定时器
End If

End Sub
----
private sub form_load
Timer1.Interval=60000 (时间间隔随意)
Timer1.Enabled=True
end sub

读书人网 >VB

热点推荐