Вывод списка пользователей домена в ListBox - Visual Basic .NET

Формулировка задачи:

есть код, который выводит пользователей с домена. Есть два вопроса

                    Листинг программы
                
 
                        
                          
                    
 Dim directoryEntry As DirectoryEntry = New DirectoryEntry(("WinNT://" + "ors.local"))
        Dim userNames As String '= "<strong class="
        For Each child As DirectoryEntry In directoryEntry.Children
            If (child.SchemaClassName = "User") Then
                userNames = (userNames _
                            + (child.Name + Environment.NewLine))
            End If
 
        Next
        MsgBox(userNames)
        ListBox1.Items.Add(userNames)
 
    End Sub

1. Как сделать так что бы в listbox , или в Listview выводился список не одной строкой, а каждый пользователь с новой строчки( пытаюсь сделать так:

                    Листинг программы
                
  ListBox1.Items.Add(userNames)

выводит всех пользователей в одну строку. 2. возможно ли получить дату и время последнего логона пользователя.

Решение задачи: «Вывод списка пользователей домена в ListBox»

textual
                            Листинг программы 
                        
 Dim directoryEntry As DirectoryEntry = New DirectoryEntry(("WinNT://" + "ors.local"))
        Dim userNames As String '= "<strong class="
        For Each child As DirectoryEntry In directoryEntry.Children
            If (child.SchemaClassName = "User") Then
                ListBox1.Items.Add(userNames & " - " & child.Name)
            End If
 
        Next
        MsgBox(userNames)
        
    End Sub