如何使控件不可用
怎么使控件不可用
在VB窗体中有个按钮，我想在每天的9点以后，这可按扭就不可用了，怎么写代码呢，谢谢
------解决方案--------------------
有的按钮是有 COMMAND1.Enabled=False 这样的用法
最好是在代码中进行识别
Private Sub Command1_Click()
if hour(now)>=9 then exit sub
****
End Sub
------解决方案--------------------
楼上的办法好，还可以进一步：
当然，也可以使用定时长一些的 Timer 控件：
在VB窗体中有个按钮，我想在每天的9点以后，这可按扭就不可用了，怎么写代码呢，谢谢
------解决方案--------------------
有的按钮是有 COMMAND1.Enabled=False 这样的用法
最好是在代码中进行识别
Private Sub Command1_Click()
if hour(now)>=9 then exit sub
****
End Sub
------解决方案--------------------
楼上的办法好，还可以进一步：
Private Sub Command1_Click()
If Hour(Now)>= 9 Then
Command1.Enabled = False
Exit Sub
End If
'****
End Sub
当然，也可以使用定时长一些的 Timer 控件：
Private Sub Timer1_Timer()
If TimeValue(Now) > "9:00" Then
Command1.Enabled = False
Timer1.Enabled = False
End If
End Sub