💎一站式轻松地调用各大LLM模型接口,支持GPT4、智谱、星火、月之暗面及文生图 广告
## **描述** 根据指定的index选择下拉框中内容 ## **语法** SelectComboBoxIndex(*hWnd, intIndex*) **该语法中有下列命名参数:** | 参数 | 描述 | | --- | --- | | hWnd | 必须的。 Long类型,表示要操作的下拉框的句柄。 | | intIndex | 必须的。 Integer类型,表示要选择的下拉列表中的索引,从0开始。 | ## **返回值** | 无 | | --- | | - | ## **示例** > 说明:请打开记事本,然后点菜单“格式” - “字体”,运行中的每一步注意对照字体对话框界面,看看代码对应的变化情况 ![](https://img.kancloud.cn/2a/d3/2ad340d1e5ef93265e084fc2921c10f4_482x691.png) **运行后:** ![](https://img.kancloud.cn/8d/af/8dafe0b52dad85431cfdbf69275e9580_488x707.png) **代码:** ``` Dim w As New clsWindow Dim lngHwnd As Long If w.GetWindowByTitle("字体", 0).hWnd <> 0 Then lngHwnd = w.GetElementHwndByClassName("ComboBox", 2) '根据类名获得“字型”组合框的句柄,第1个是“字体”,索引2位“字型 w.SelectComboBoxIndex lngHwnd, 1 MsgBox "选中“倾斜”" w.SelectComboBoxIndex lngHwnd, 3 MsgBox "选中了“粗体倾斜”" w.SelectComboBoxIndex lngHwnd, 0 MsgBox "选中“常规”" w.SelectComboBoxIndex lngHwnd, 2 MsgBox "选中“粗体”" End If ```