**** Merged from MCS ****

[mono-project.git] / mcs / btests / DecimalLiteral1.vb

Imports System
Module DecimalLiteral
        Sub Main()
                Try
                        Dim a As Decimal
                        a="Hello"
                                                                                                                                     
                Catch e As Exception
                        Console.WriteLine(e.Message)
                End Try
        End Sub
End Module