Rubrik: Controls · ListBox & ComboBox | VB-Versionen: VB2005, VB2008 | 14.06.10 |
ComboBox per Pfeiltaste aufklappen Mit diesem Code ist es möglich, die ComboBox autom. per "Pfeil nach unten"-Taste aufzuklappen. | ||
Autor: Dieter Otter | Bewertung: | Views: 11.094 |
www.tools4vb.de | System: 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