vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 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, VB200814.06.10
ComboBox per Pfeiltaste aufklappen

Mit diesem Code ist es möglich, die ComboBox autom. per "Pfeil nach unten"-Taste aufzuklappen.

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

Nachfolgender Code zeigt, wie sich die ComboBox-Liste autom. aufklappen lässt, sobald der Anwender die "Pfeil-Nach-Unten"-Taste drückt, so dass er per Cursortasten sofort den Inhalt der Liste sieht bzw. den gewünschten Eintrag auswählen kann.

Private Sub ComboBox1_KeyDown(ByVal sender As Object, _
  ByVal e As System.Windows.Forms.KeyEventArgs) Handles ComboBox1.KeyDown
 
  ' Wurde die Pfeil-Nach-Unten Taste gedrückt?
  If e.KeyCode = Keys.Down AndAlso e.Shift = 0 Then
    With DirectCast(sender, ComboBox)
      ' ComboBox-Liste autom. aufklappen, falls noch nicht sichtbar
      If Not .DroppedDown Then .DroppedDown = True
    End With
  End If
End Sub