コンボボックスについて

解決

まさまさ 2003-04-17 23:01:08 No: 77732

コンボボックスへカーソルがSetFocusされたら自動でDropDownさせる方法はありますか？
ご存知の方いましたら教えて下さい。
お願いします。

nanashi 2003-04-18 01:43:52 No: 77733

GotFocusイベントでSendMessageしてやれば出来ます。

Private Sub Combo1_GotFocus()
    Const CB_SHOWDROPDOWN = &H14F

    Call SendMessage(Combo1.hWnd, CB_SHOWDROPDOWN, CLng(1), ByVal CLng(0))
End Sub

まさまさ 2003-04-19 05:11:11 No: 77734

ありがとうございました。解決し、納期にも間に合わせる事が出来ました。