dotNETportal.cz

Pokud máte na formuláři ještě jiný prvek, třeba tlačítko, převeďte na něj zaměření (focus). Kdyby byl na formuláři jen samotný ComboxBox, pak nevím

Public Class Form1

  Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
    Button1.Focus()
  End Sub

  Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
    End
  End Sub
End Class

(jen amatérská rada)

Tak jsem to zkoušel a na ten formulář to nejde. Pokud na formuláři chcete mít pouze ComboBox a chcete z něj vylést, tak je nejlepší použít výše uvedený kod:

   Button1.Fosus()

...a tlačítko (Button1) umístit mimo formulář.

Pozor tlačítko musí být visible (Button1.Visible=True). Nejlepší je ho tam, kam se formulář nemůže roztáhnout, pokud je sizable. Tzn. pokud platí Form1.FormBorderStyle = Sizable nebo Form1.AutoSize = True

Mimo formulář lze tlačítko umístit v režimu [Design] v okně Properties -> Location -> 500:-50. Takto se tlačítko octne mimo Formulář, ale můžete na něj snadno zapomenout, což vám může, ale nemusí být jedno.

Proto ja osobně používá druhou variantu, asice:

  Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
     Button1.Top = -50
  End Sub

Tím se tlačítko přesune po načtení Form1 "mimo zorné pole" a v navrhu ho můžu mit kdekoli uprostřed formuláře.

No a tady je ještě kod na ošetření toho stisknuti ENTERu

    Private Sub ComboBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles ComboBox1.KeyDown
        If e.KeyCode = Keys.Return Then Button1.Focus()
    End Sub