Sub Main Debug.Print StrComp("F","e") ' -1 Debug.Print StrComp("F","e",1) ' 1 Debug.Print StrComp("F","f",1) ' 0End Sub