Listing servers on a network

See more:

VB

I found the following code to show instances on SQL Servers on a network:

Private Sub DisplayData(ByVal table As DataTable)
   For Each row As DataRow In table.Rows
        For Each col As DataColumn In table.Columns
            Debug.Print("{0} = {1}", col.ColumnName, row(col))
        Next
        Debug.Print("============================")
   Next
End Sub
Private Sub Form1_Load(ByVal sender As Object, _
                       ByVal e As System.EventArgs) _
            Handles Me.Load
   ' Retrieve the enumerator instance and then the data.
   Dim instance As SqlDataSourceEnumerator = _
            SqlDataSourceEnumerator.Instance
   Dim table As System.Data.DataTable = instance.GetDataSources()
   ' Display the contents of the table.
   DisplayData(table)
   'Console.WriteLine("Press any key to continue.")
   'Console.ReadKey()
End Sub

This code returns the following to the Intermediate window:
ServerName = LT-MRM-1
InstanceName =
IsClustered =
Version =
All I want to do is make a list of server names in a combobox, but I can't find a simple solution.
Can someone point me in the right direction?

[Modified: added code formatting]