Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Einträge aus der Combo löschen....
Autor: Emerson
Datum: 24.02.02 19:45
Code: ------------------------------------------------- Private Sub Combo2_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer) ' Per "ENTF"-Taste aktuellen Eintrag aus der Liste löschen - If KeyCode = vbKeyDelete And Combo2(Index).ListIndex >= 0 Then 'ENTF-Taste? - ' Ist die ComboBox aufgeklappt? If CBool(SendMessage(Combo2(Index).hWnd, CB_GETDROPPEDSTATE, 0, 0)) Then - ' aktuellen Eintrag löschen Combo2(Index).RemoveItem Combo2(Index).ListIndex - ' Fenster neuzeichnen Me.Refresh End If End If End Sub ------------------------------------------------- Fehler-Meldung: Sub oder Function nicht definiert. - Den Tipp hab ich hier her: http://www.visualbasic-archiv.de/archiv/tipp_details.php3?pid=440 - Wenn ich auf 'Debuggen' klicke, dann markiert er mir 'SendMessage' - Los - schreibt was... ! - MfG, Emerson

Einträge aus der Combo löschen....	60	Emerson	24.02.02 19:45
Re: Einträge aus der Combo löschen....	186	Moni	24.02.02 19:54

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen