Example - OptionCompare Statement

  1. OptionCompare Text  

  2. Sub main

  3. Dim i As Integer

  4. i = StrComp("3 A", "3- B", vbTextCompare)

  5. MsgBox i

  6. End Sub