hoi. bin da gerade am VB programmieren..
da soll ich eine tabelle machen (so eine variable mit index) und diese dann alphabetisch ordnen..
da dachte ich ich frag hier mal, denn buchstabe für buchstabe testen ist wohl nicht so die effektivste art.. und ich glaube hier gibt es ein paar info's die auch mal VB gelernt haben...
dankeschön 
wie genau füllst du die Tabelle? Mit einem Array oder wie genau?
müsste so gehen
Dim myVal(10) As String
Private Sub Command1_Click()
' zuerst sortieren
SortierenBubble myVal
' dann die Liste füllen
List1.Clear
Dim i As Integer
For i = 0 To UBound(myVal)
List1.AddItem myVal(i)
Next
End Sub
Private Sub Form_Load()
' Array füllen
myVal(0) = "Athen"
myVal(1) = "Bremerhaven"
myVal(2) = "Amsterdam"
myVal(3) = "Wien"
myVal(4) = "Bozen"
myVal(5) = "Paderborn"
myVal(6) = "Frankfurt"
myVal(7) = "Kopenhagen"
myVal(8) = "Ulm"
myVal(9) = "Velden"
myVal(10) = "Berlin"
' Liste füllen
Dim i As Integer
For i = 0 To UBound(myVal)
List1.AddItem myVal(i)
Next
End Sub
Private Sub SortierenBubble(ByRef sArray() As String)
' Die Sortierfunktion
Dim tmp As String
Dim i As Integer
Dim j As Integer
For i = 0 To UBound(sArray)
For j = 0 To UBound(sArray)
If sArray(i) < sArray(j) Then
tmp = sArray(i)
sArray(i) = sArray(j)
sArray(j) = tmp
End If
Next j
Next i
End Sub
Ich kannte es vorher auch nicht. Doch wenn mans mal gesehen hat, dann ists einfach. Habs sogar heute auch gebraucht, oder brauche es immernoch, einfach für Single-Variablen und keine strings
hmm, einen Fehler hatt das teil..
und zwar kommen die Grossbuchstaben vor den kleinen.. so ist ZZ-Top vor arafat da der Z gross geschrieben ist.. naja.. ist ja nicht so schlimm...
vieleicht wenn du anstelle UBound alles mit LBound machst
da geht nix mehr.. 
naja, ich lass es so wies ist..
Ach ja und es funktioniert nur, wenn die Arrays von 0 beginnen
