use the $wmiColl.Count to build your array..

dim $array[$wmiColl.Count]

for each $wmiObj in $wmiColl
$array[$i] = $wmiObj.name
$i = $i + 1
next