Example:
Dim vBook as new AddressBook
Dim vContacts() as AddressBookContact = vBook.Contacts
Dim vContactsCount as integer = UBound( vContacts )
for i as integer = 0 to vContactsCount
AddressListbox.AddRow vContacts(i).CompanyName
AddressListbox.Cell( AddressListbox.LastIndex, 1 ) = vContacts(i).LastName
AddressListbox.Cell( AddressListbox.LastIndex, 2 ) = vContacts(i).AIMScreenNames
next
If CompanyName OR LastName is NIL --> no problem
If AIMScreenNames is NIL --> OutOfBoundsException
I try this - but don't work:
[code] If vContacts(i).AIMScreenNames = NIL then //do nothing
If len( vContacts(i).AIMScreenNames ) < 1 then //do nothing[/code]
Any ideas?