Test AddressBookContact.AIMScreenNames against NIL

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?

For j As Integer = 0 To vContacts(i).AIMScreenNames.Count - 1 Then ... = vContacts(i).AIMScreenNames.Value(j) Next

Thanks @Eli,

works perfekt and now I understand this much better.

Cheers!