Imports Microsoft.VisualBasic 
Imports System
Public Class TestClass 
	Public Function Test() As Char
		'Begin Code
			Dim a As Object = Nothing
			Dim d As Char = ChrW (a)
			Return d
		'End Code
	End Function
End Class