Querying Active Directory

[Gary]

I'm creating an Infopath form and I need to query Active Directory to obtain
some data. Here is the code I'm using (obtained from sample code from MSDN)

Private Shared domainADsPath As String = "LDAP://xxx.com"
Private Shared username As String = "gary"
Private Shared password As String = "password"
Private Shared schemaClassNameToSearch As String = "user"

Sub Lookup
Dim strUserName as String
Dim searcher As New DirectorySearcher()

searcher.SearchRoot = New DirectoryEntry(domainADsPath, username,
Password)
searcher.Filter = "(objectClass=" + schemaClassNameToSearch + ")"
searcher.SearchScope = SearchScope.Subtree
searcher.Sort = New SortOption("name", SortDirection.Ascending)
searcher.PropertiesToLoad.AddRange(New String() {"displayName", "name"})

Dim result As SearchResult
result = searcher.FindOne()

If Not (result Is Nothing) Then
Dim myResultPropColl As ResultPropertyCollection
Dim myResultPropValColl As ResultPropertyValueCollection
myResultPropColl = result.Properties
myResultPropValColl = myResultPropColl.Item("name")
strUserName = myResultPropValColl.Item(0).ToString()
thisXDocument.DOM.selectSingleNode("//my:Name").text = strUserName
Else
thisXDocument.DOM.selectSingleNode("//my:Name").text = "Not Found"
End If

What displays on the form is the object name
(ie. System.DirectoryServices.ResultPropertyValueCollec tion), not the value
of the property. All of the classes return an object and not a string. How do
I return the actual value of the property?

Thanks for the help!
--
Gary