首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB中的Time,该如何解决

2012-02-04 
VB中的Time我想做了时间触发,当8:30时让我的按钮显示出来我是初学,请大家帮帮忙![解决办法]If Format(Now,

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

热点排行