小弟我是一个新手，想请问一个有关问题

我是一个新手，想请教一个问题
我的代码是这样的：
        Dim   hour   As   Integer
Select   Case   hour
  Case   hour   > =   18
        Print   "lin "
  Case   hour   > =   14
        Print   "you "
End   Select

我没论怎样改变系统的时间都不能改变打印结果的，打印结果老是LIN。要如何才能把HOUR与系统时间挂上钩呀。请指导一下。

[解决办法]
Hour是函数，不要定义同名变量
Select Case Hour(now)
Case is > = 18
Print "lin "
Case is > = 14
Print "you "
End Select