我想判断 系统 当前时间 是否 过了 2009-12-12 12:12:12 代码怎么写?只判断 日期 是否超过,我是用这样   If Date > CDate("2009-12-12") Then
   '''''
   '''''
  End if如果包括 小时 、分、秒怎么写?

解决方案 »

  1.   

    If Now > CDate("2009-12-12 12:12:12") Then
      

  2.   

    if datediff("s", now,date)> 0 then
      

  3.   

    你可以直接按本地格式输入日期常量:
    If Now() > #2009-12-12 12:12:12# Then
    VB-IDE 可能会自动格式化为统一格式(没试过中文版 VB 的情况):
    If Now() > #12/12/2009 12:12:12 PM# Then
      

  4.   

    If CDate(Now) > CDate(2009-12-12 12:12:12) Then
      

  5.   

            Dim NowDate As Date
            NowDate = #12/12/2009 12:12:12 PM#
            
            If DateDiff("S", NowDate, Now) > 0 Then
               Debug.Print "是!"
            Else
               Debug.Print "否!"
            End If