Updated project.
[mono.git] / mcs / btests / ArithmeticOperators1.vb
1 \r
2 Imports System\r
3 \r
4 Module ArithmeticOperators1\r
5 \r
6     Sub main()\r
7 \r
8         Dim b1 As Decimal\r
9         b1 = 34.45\r
10         b1 = b1 / 0\r
11         Console.WriteLine(b1)\r
12 \r
13     End Sub\r
14 \r
15 End Module