vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück
Rubrik: Controls · ListBox & ComboBox   |   VB-Versionen: VB2005, VB200808.12.09
ComboBox-Liste automatisch aufklappen

Ein simpler Einzeiler und schon klappt sich die Liste einer ComboBox bei Erhalt des Fokus oder bei Eingabe eines Zeichens auf.

Autor:   Dieter OtterBewertung:     [ Jetzt bewerten ]Views:  34.809 
www.tools4vb.deSystem:  Win2k, WinXP, Win7, Win8, Win10, Win11 Beispielprojekt auf CD 

Mit nachfolgendem Einzeiler lässt sich die Liste einer ComboBox bei Erhalt des Fokus automatisch aufklappen:

Private Sub ComboBox1_GotFocus(ByVal sender As Object, _
  ByVal e As System.EventArgs) Handles ComboBox1.GotFocus
 
  ' ComboBox aufklappen und Liste anzeigen
  ComboBox1.DroppedDown = True
End Sub

Soll die ComboBox-Liste erst aufgeklappt werden, wenn der Anwender ein Zeichen in das Eingabefeld eingibt, verwenden wir einfach statt dem GotFocis-Ereignis das KeyPress-Ereignis:

Private Sub ComboBox1_KeyPress(ByVal sender As Object, _
  ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ComboBox1.KeyPress
 
  ' ComboBox-Liste bei Eingabe eines Zeichens autom. aufklappen
  ComboBox1.DroppedDown = True
End Sub