Imports SystemPublic Class MainClass Shared Sub Main() Dim river As String = " www.rntsoft.com " Console.WriteLine(river.ToUpper()) Console.WriteLine(river.ToLower()) End Sub End Class