End to Begining (Type)

How can I exchange the type execute from end to begining?

Begining to end:

for Type.Types = each Types
;do something
next

End to begining:

for Type.Types = ??????
;do something
next

myType=last Types
while myType<>null
; do something
myType=before myType
Wend

Other commands that could be useful: First, After

You can even sort them:

insert myType before anothertype

That works. Thank you!

-Jouko-