er soll aus einer listbox werte vergleichen und wenn sie gleich sind einen von beiden löschen.
"invalid procedure or call of argument" bringt er mir als fehler, warum?
Code-Auszug:
-----------------------------------------------------------------------------
Dim filter As Boolean

begin:
filter = False
Do While Not filter
filter = True
For lauf = 0 To List_time.List(List_time.ListCount - 1)
If List_time.List(List_time.ListCount - 1) = List_time.List(lauf) Then
List_time.RemoveItem CDbl(List_time.List(lauf))
GoTo begin
End If
filter = False
Next lauf
Loop
-----------------------------------------------------------------------------
mfg
tobias