mcs/btests/AssignmentStatementsC1.vb

   1 REM LineNo: 11\r
   2 REM ExpectedError: BC30311\r
   3 REM ErrorMessage: Value of type 'Date' cannot be converted to 'Integer'.\r
   4 \r
   5 Imports System\r
   6 \r
   7 Module AssignmentStatementsC1\r
   8 \r
   9     Sub main()\r
  10         Dim a As Integer\r
  11         a = New Date(200)\r
  12         Console.WriteLine(a)\r
  13 \r
  14     End Sub\r
  15 \r
  16 End Module\r