Added VB runtime tests

[mono.git] / mcs / class / Microsoft.VisualBasic / Test / standalone / 5073.vb

diff --git a/mcs/class/Microsoft.VisualBasic/Test/standalone/5073.vb b/mcs/class/Microsoft.VisualBasic/Test/standalone/5073.vb
new file mode 100644 (file)
index 0000000..bc19412
--- /dev/null
+++ b/mcs/class/Microsoft.VisualBasic/Test/standalone/5073.vb
@@ -0,0 +1,10 @@
+Imports Microsoft.VisualBasic \r
+Imports System\r
+Public Class TestClass \r
+       Public Function Test() As Char\r
+               'Begin Code\r
+                       Dim d As Char = ChrW (26.9)\r
+                       Return d\r
+               'End Code\r
+       End Function\r
+End Class\r