在combo控件中输入文本,同时下拉列表能自动索引到,该怎么做?
回复:PrivateSubCombo1_LostFocus()Combo1.AddItemCombo1.TextEndSub 回复:失焦点后起效 回复:DimIAsIntegerOnErrorGoToErrLineForI=0TocomTmp.ListCount-1IfTrim(comTmp.List(I))=strTextThencomTmp.ListIndex=I:ExitForEndIfNextI也可以在change事件調用,也可以在失去焦點時調用 回复:期望中.............. 回复:不明白,点下拉箭头这时下拉列表不就弹出来了吗,这时你输入文本,下拉列表就会列出与你输入类似的行 回复:1:把COMBO的Combo1.Style=22: |
|