Supportnet / Forum / Datenbanken
Kombinationsfeld öffnen
Frage
Hallo Leute,
wie kann ich realisieren, dass sich ein Kombinationsfeld bei Fokuserhalt oder zumindest bei Eingabe des ersten Buchstaben öffnet und zum nächst passenden Eintrag springt.
Habe es mit der SendMessageA-Funktion versucht, erhalte aber die Meldung, dass das Object für diese Aktion nicht zur Verfügung steht.
Bin für jede Hilfe dankbar!
Vielen Dank
Itschi
Antwort 1 von Armin
Hi
ich verwende Kombinationsfelder immer mit indizierten Feldern (2 Spalten) wobei die gebundene Spalte die 1. ist und Spaltenbreite 0cm ist.
Dann funktioniert das Kombifeld immer so wie Du willst.
gruesse armin
ich verwende Kombinationsfelder immer mit indizierten Feldern (2 Spalten) wobei die gebundene Spalte die 1. ist und Spaltenbreite 0cm ist.
Dann funktioniert das Kombifeld immer so wie Du willst.
gruesse armin
Antwort 2 von Tobs
Hallo Itschi,
Dein Kombinationsfeld sollte eine Dropdown-Liste sein. Als Herkunftstyp eine Tabelle/Abfrage! Schau Dir mal die Eigenschaften mit dem Assi an. "Automatisch ergaenzen" muesste auf Ja stehen.
mfg, Tobs
Dein Kombinationsfeld sollte eine Dropdown-Liste sein. Als Herkunftstyp eine Tabelle/Abfrage! Schau Dir mal die Eigenschaften mit dem Assi an. "Automatisch ergaenzen" muesste auf Ja stehen.
mfg, Tobs
Antwort 3 von struppi
Hallo
Ich minimiere meine Kombifelder im Entwurf(nur noch Taste zu sehen) manchmal und aktiviere sie nach dem folgenden Prinzip:
Private Sub kombix_GotFocus()
kombix.Height = 250
kombix.Width = 5000
End Sub
Private Sub kombix_LostFocus()
kombix.Height = 250
kombix.Width = 250
End Sub
Private Sub kombix_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
kombix.SetFocus
kombix.Dropdown
End Sub
Ich minimiere meine Kombifelder im Entwurf(nur noch Taste zu sehen) manchmal und aktiviere sie nach dem folgenden Prinzip:
Private Sub kombix_GotFocus()
kombix.Height = 250
kombix.Width = 5000
End Sub
Private Sub kombix_LostFocus()
kombix.Height = 250
kombix.Width = 250
End Sub
Private Sub kombix_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
kombix.SetFocus
kombix.Dropdown
End Sub
Antwort 4 von Itschi
Danke struppi1999@gmx.de,
dein Tip hat mir die Lösung gebracht.
War eigentlcih super simple.
Private sub Combo_change()
combo.dropdown
end sub
Möchte mal wissen, warum mein super VB-Buch mit einer SenDMessageA-Funkiton arbeitet, was a) nicht geht und b) kompliziert ist
Danke nochmal
dein Tip hat mir die Lösung gebracht.
War eigentlcih super simple.
Private sub Combo_change()
combo.dropdown
end sub
Möchte mal wissen, warum mein super VB-Buch mit einer SenDMessageA-Funkiton arbeitet, was a) nicht geht und b) kompliziert ist
Danke nochmal