Imports System
Public Class Program
Public Shared Sub Main()
Dim str As String = "converts a STRING IN VB.NET"
str = str.Substring(0, 1).ToUpper() & str.Substring(1).ToLower()
Console.WriteLine(str)
End Sub
End Class
' run:
'
' Converts a string in vb.net
'