That code you posted is the kind of thing you'd do in VB6.
It wouldn't have worked any better though. They ain't changed the specifications of arrays since ... well ... ever!