Visual Basic - listbox

como puedo sacar del listbox nombres ordenados alfabeticamente y pasarlos
a un texbox o grabarlos a el disco duro sin variar el orden alfabetico

Haz una implementacion del metodo burbuja

Qué leches de metodo burbuja, le pones la propiedad Sorted a True y lo pasas a un TextBox o archivo plano con un For... Next

gracias pero eso lo he hecho pero me coge todos los nombres que
quiero ordenar pero no los saca del listbox y los escribe el el textbox igual
que si NO los hubiera ordenado antes con el listbox

ya... ¿y cual es el código que pones?

Private Sub Timer1_Timer()
N = N + 1

For I = 1 To CUENTA
If CODIGO(I) = N Then
LISTA = LISTA + 1
ORDENO(LISTA) = TEXTO(I)

entry = TEXTO(I) ' Crea la entrada.


List1.AddItem entry ' Agrega la entrada.
TEXTO(I) = entry


Text2 = Text2 & entry & vbCrLf

End If

PERO NO ME LLENA EL TEXTBOX ORDENADO ALFABETICAMENTE

No entiendo muy bien ése código (se escapa a mis pobres conocimientos) pero te pongo un ejemplo a ver si te ilumina

Private Sub Form_Load()
List1.AddItem "Pepe"
List1.AddItem "Zapata"
List1.AddItem "Antonio"
List1.AddItem "Aaron"
End Sub

Private Sub Command1_Click()
For i = 0 To List1.ListCount - 1
List1.ListIndex = i
Text1 = Text1 & List1.Text & vbNewLine
Next i
End Sub

El control ListBox tiene la propiedad Sorted = True y el TextBox MultiLine = True

GRACIAS YA ME APAÑO
CON ESTO ME SOBRA