Premesso che deve essere ListCount-1, il problema che hai è strano.

Quale versione di VB6 hai installato?