vb6 error '9'

[100]

Betrachten wir folgende Zeile:
Text1.Text = Split(BinStr, "(Dil)")(1)
für mich sähe ein Array so aus
Text1.Text = Split(BinStr(1), "(Dil)")(1)

[Baal]

habs versucht jez kommt runtime error 13