mcs/mbas/Test/errors/DateLiteralsC10.vb

   1 REM LineNo: 11
   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         ' if minuts and seconds are not specified
  10         ' AM or PM must be specified
  11         d = # 1 #
  12    End Sub
  13 End Module
  14
  15
  16