Wie sortiert man in VB.NET 2003 Datums- oder Größendaten in einem ListView?

Um in VB.NET 2003 die Einträge eines `ListView` nach Datum oder Größe zu sortieren, musst du einen benutzerdefinierten Sortierer implementieren, da die Standard-Sortierung nur nach Text erfolgt. Das erreichst du mit der `IComparer`-Schnittstelle und der Zuweisung eines eigenen Sortierers an die `ListView.ListViewItemSorter`-Eigenschaft.

**Beispiel für Datumssortierung:**

```vb.net
Imports System.Collections

Public Class ListViewDateComparer
Implements IComparer

Private col As Integer
Private order As SortOrder

Public Sub New(column As Integer, sortOrder As SortOrder)
col = column
order = sortOrder
End Sub

Public Function Compare(x As Object, y As Object) As Integer Implements IComparer.Compare
Dim itemX As ListViewItem = CType(x, ListViewItem)
Dim itemY As ListViewItem = CType(y, ListViewItem)
Dim dateX As Date
Dim dateY As Date

Date.TryParse(itemX.SubItems(col).Text, dateX)
Date.TryParse(itemY.SubItems(col).Text, dateY)

Dim result As Integer = DateTime.Compare(dateX, dateY)
If order = SortOrder.Descending Then result = -result
Return result
End Function
End Class
```

**Beispiel für Größen-Sortierung (numerisch):**

```vb.net
Imports System.Collections

Public Class ListViewSizeComparer
Implements IComparer

Private col As Integer
Private order As SortOrder

Public Sub New(column As Integer, sortOrder As SortOrder)
col = column
order = sortOrder
End Sub

Public Function Compare(x As Object, y As Object) As Integer Implements IComparer.Compare
Dim itemX As ListViewItem = CType(x, ListViewItem)
Dim itemY As ListViewItem = CType(y, ListViewItem)
Dim sizeX As Long
Dim sizeY As Long

Long.TryParse(itemX.SubItems(col).Text, sizeX)
Long.TryParse(itemY.SubItems(col).Text, sizeY)

Dim result As Integer = sizeX.CompareTo(sizeY)
If order = SortOrder.Descending Then result = -result
Return result
End Function
End Class
```

**Verwendung im Code:**

```vb.net
' Beispiel: Sortiere nach Datum in Spalte 1 aufsteigend
ListView1.ListViewItemSorter = New ListViewDateComparer(1, SortOrder.Ascending)
ListView1.Sort()

' Beispiel: Sortiere nach Größe in Spalte 2 absteigend
ListView1.ListViewItemSorter = New ListViewSizeComparer(2, SortOrder.Descending)
ListView1.Sort()
```

**Hinweise:**
- Die Spaltenindizes beginnen bei 0.
- Die Daten in den jeweiligen Spalten müssen korrekt formatiert sein (Datum bzw. Zahl).
- Für weitere Sortierarten kannst du die Vergleiche im `Compare`-Methoden entsprechend anpassen.

Weitere Infos findest du auch in der [Microsoft-Dokumentation zu ListView.Sort](https://learn.microsoft.com/de-de/dotnet/api/system.windows.forms.listview.sort?view=netframework-1.1).