以编程方式选择时，组合框不突出显示

Question

vb.net 2012

我有两个组合框，其 DropDownStyle 为 DropDownList。我在表单加载时选择其中一个组合框，cboMyBox.Select()。我的问题是，当我以编程方式选择（或聚焦或全选）组合框时，它不会显示虚线突出显示。当我在控件之间切换时，虚线高亮显示得很好。我在选择它之前用数据填充组合框。

当我在代码中选择控件时，如何让虚线高亮显示？

在代码中选择了组合框但没有突出显示

Tab 到下一个控件并突出显示节目

Ctrl+Tab 返回初始组合框，高亮显示

Answer 1

我已经做了一些实验，似乎一旦您选择了任何控件，如组合框或文本框，然后使用 Select() 或 Focus() 方法，选择框（虚线矩形）出现在所有组合框；即使您之前没有使用所有选项卡。

诀窍是在表单打开时使用SendKeys 切换到某些控件。

Private Sub Form1_Shown(sender as Object, e as EventArgs) _ 
    Handles Form1.Shown

    ' Select the control preceding a combo box in the tab order.
    textBox1.Select()

    SendKeys.SendWait("{Tab}")
    SendKeys.SendWait("{Tab}")

    ' Select the fist control to be selected when form opens.
    btnFocus.Select()
End Sub

只有在两次发送 TAB 键时才有效（不要问我为什么，可能是时间问题）。