? StrComp("0anime", "[anime", vbBinaryCompare)
-1
? StrComp("0anime", "[anime", vbTextCompare)
1

Когда забываешь, что vbTextCompare – это не только сравнение без учёта регистра.