mcs/mbas/Test/errors/DateLiteralsC7.vb

   1 REM LineNo: 9
   2 REM ExpectedError: BC31085
   3 REM ErrorMessage: Date constant is not valid.
   4
   5 Module DateLiterals
   6     Sub Main()
   7         Dim d As Date
   8
   9         d = # 13:05:07 AM #
  10    End Sub
  11 End Module
  12
  13
  14