You're going about this all wrong. You should start with a Phone class:
vb.net Code:
Public Class Phone
'Member declarations here.
End Class
You should then define a class that represents a collection of Phone objects:
vb.net Code:
Public Class PhoneCollection
Inherits System.Collections.ObjectModel.Collection(Of Phone)
End Sub
The PhoneCollection inherits everything it needs from the Collection class, like Add and Remove methods and an Item property. You would then declare a property in your Exchange class of that type:
vb.net Code:
Public Class Exchange
Private _phones As New PhoneCollection
Public ReadOnly Property Phones() As PhoneCollection
Get
Return Me._phones
End Get
End Property
'Other declarations here.
End Class
You would then add a new Phone to an Exchnage like this:
vb.net Code:
Dim myPhone As New Phone
myExchange.Phones.Add(myPhone)
The PhoneCollection already has a IndexOf method too, so your method with the silly name is not required.
You could then add a method to your PhoneCollection named FindByNumber that would find a Phone object given a phone number. Etc., etc.