'Author: ' V. Sudharsan (vsudharsan@novell.com) ' ' (C) 2005 Novell, Inc. Module ExpConversionStringtoCharA Sub Main() Dim a as Char Dim b as String= "This is a program" a = CChar(b) if a <> "T" Throw new System.Exception("Conversion of String to Char not working. Expected T but got " &a) End if End Sub End Module