String Functions VisualBasic Script

Sub UsefulStringFunctions() 
    Dim sTestWord As String 
    sTestWord = "The moon over Minneapolis is big and bright." 
    Debug.Print sTestWord
    Debug.Print StrConv(sTestWord, vbProperCase) 
End Sub