title image


Smiley Listview sortieren nach Spalte 2 - VB6
Hallo Forum,



Hab da ein Problemchen, was mich schon etwas länger quält.



Also, ich lese aus einer INI-Datei Werte in eine ListViewbox ein:



Name=Wert



jetzt ist es in meinem Programm erforderlich, das die Listviewbox nach Spalte 2 also dem Wert aufsteigend sortiert wird.



hier mal der Code für das einlesen:



Option Explicit

Dim INIErg As String

Private Sub Form_Load()

Dim Prozente As String

Dim Key() As String

Dim i As Integer

Dim itemX As ListItem

INIErg = "C:\Windows\system32\Ergeb.ini"

lvwProz.ListItems.Clear

Prozente = GetIniString("Prozente", vbNullString, _

"", INIErg, 32767)

If Prozente "" Then

Key = Split(Prozente, Chr$(0))

With lvwProz.ListItems

For i = 0 To UBound(Key) - 1

Set itemX = .Add(, , Key(i))

itemX.SubItems(1) = GetIniString("Prozente", _

Key(i), "", INIErg)

Next i

End With

With lvwProz

.ColumnHeaders(1).Width = 10000

.ColumnHeaders(2).Width = 2000

If .ListItems.Count > 0 Then

Set .SelectedItem = .ListItems(1)

End If

.Enabled = True

End With

End If

End Sub



ist es möglich die Box nach dem Wert(Spalte2) zu sortieren?



Vielen Dank schonmal für Eure Tips und Lösungen



Grüße



Hoffi



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: