mcs/btests/CharacterLiteralsC6.vb

   1 REM LineNo: 11
   2 REM ExpectedError: BC30311
   3 REM ErrorMessage: Value of type 'Double' cannot be converted to 'Char'.
   4
   5 Imports System
   6 Module CharacterLiteral
   7         Sub Main()
   8                 Try
   9                         Dim a As Char="R"c
  10                         Dim b As Char="W"c
  11                         Dim f As Char=1.23
  12                         Dim c As Char
  13                         Dim d As Char
  14                         c=a+b
  15                 Catch e As Exception
  16                 End Try
  17         End Sub
  18 End Module