Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim comp As String() = New String() {"192.168.200.20", "192.168.200.1", "192.168.200.2", "Indirizzo1", "Indirizzo2", "Indirizzo20", _
 "Indirizzo3"}

        Array.Sort(comp, New ArrayComparer())

    End Sub