DIM hResultFields AS .ResultFields DIM hResultField AS ResultField FOR EACH hResultField IN hResultFields ...NEXT