get contacts olny name and id

At my program i have
Dim Contacts As Contacts2
Dim ListOfcontacts As List
ListOfcontacts=Contacts.GetAll (True,True)
this return a list with
DisplayName=The name, PhoneNumber=the phone, Starred=false, Id=32, Notes=, TimesContacted=0, LastTimeContacted=0, Name= the name

how can I get only the displayname and the ID to a list and sort it by name?

from B4X Community - Android, iOS, desktop, server and IoT programming tools http://ift.tt/28TgZBD
via IFTTT