Hi.
mein problem
also wenn ich etwas im text editiert habe und danach den button editieren gedrückt habe kommt das:
code der markiert wird:
Code:
Private Sub cmd_editieren_Click()
Dim list As ListItem
lv.ListItems.Remove (Indexeditieren)
Indexeditieren = Indexeditieren + 1
[b]Indexeditieren = lv.SelectedItem.Index[/b]
Set list = lv.ListItems.Add(Indexeditieren, , txt_name.Text)
With list
.SubItems(1) = txt_passwort.Text
.SubItems(2) = txt_beschreibung.Text
End With
cmd_editieren.Visible = False
cmd_einfügen.Visible = True
End Sub
vllt. könnt ihr mir ja helfen
ZiG_ Überflieger
Anmeldedatum: 07.03.2007 Beiträge: 1248
Verfasst am: 11.04.2008, 16:59
Abgesehen davon, dass mir deine Lösung mit der Variable "Indexeditieren" ziemlich buggy vorkommt, wird das Problem da liegen, dass einfach nach dem Löschen eines Items wahrscheinlich kein Item mehr selected ist.
Und da bekommst du bei SelectedItem einen Fehler.
Wäre gut, wenn du noch kurz erklären könntest was du da bitte mit "Indexeditieren" machst.
Indexeditieren ist in meinen Augen immer das zuletzt selektierte, aber auch nur wenn ich was editiert hab.
Dann wird es um 1 erhöht und dann fügst du überhaupt einen anderen Wert ein. Oder willst es zumindest.
Also für mich etwas chaotisch. Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
Registrieren
Login
