mcs/mbas/Test/tests/ExpConversionLongtoStringA.vb


1
2
3
4
5
6
7
8
9
10
11
12
13
14

'Author:
'   V. Sudharsan (vsudharsan@novell.com)
'
' (C) 2005 Novell, Inc.

Module ExpConversionLongtoStringA
	Sub Main()
			Dim a as Long = 123
			Dim b as String= a.toString()
			if b <> "123"
				Throw new System.Exception("Conversion of Long to String not working. Expected 123 but got " &b) 
			End if		
	End Sub
End Module