one more test case for constant
[mono.git] / mcs / btests / LongLiteralC1.vb
1 Imports System
2 Module LongLiteral
3         Sub Main()
4         Try
5                 Dim a As Long
6                 a=&H
7         Catch e As Exception
8                 Console.WriteLine(e.Message)
9         End Try
10         End Sub
11 End Module