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