- 日時: 2007/08/21 15:36
- 名前: 花ちゃん
- ***********************************************************************************
* カテゴリー:[コンボボックス][][] * * キーワード:マウスカーソル,ドロップダウン,,,, * ***********************************************************************************
元質問:コンボボックスのドロップダウンリスト - KANA 2007/05/17-08:29 No.9158
早速ですがここに掲載されている、【コンボボックスのドロップダウンリストを表示】を活用したいと考えていますが開く動作を Private Sub Command1_Click() ではなく Private Sub Combo1_Change() で動作させるとリスト表示されたあとのマウスカーソルが消えてしまいます。 何か良い解決方法はないでしょうか??
----------------------------------------------------------------------------------- Re: コンボボックスのドロップダウンリスト - 魔界の仮面弁士 2007/05/17-11:02 No.9160
こんなのがありました。 直接的な関係は無いかも知れませんが、間接的には関係あるかも。
http://forums.microsoft.com/MSDN-JA/ShowPost.aspx?PostID=1299081&SiteID=7
http://support.microsoft.com/kb/418696/ja
----------------------------------------------------------------------------------- Re^2: コンボボックスのドロップダウンリス.. - 花ちゃん 2007/05/17-11:42 No.9161
私は、非表示になっていたので、解らなかったのですが上記を試したら同様ですね。
下記なら消えないようです。 Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer) Call SendMessage(Combo1.hWnd, CB_SHOWDROPDOWN, 1&, ByVal 0&) End Sub ----------------------------------------------------------------------------------- 上記、マウスカーソルが消える要因は、Combo1_Change イベント内で処理し、且つ、コントロールパネルの[マウスのプロパティ]での、【文字の入力中にポインタを非表示にする】設定をオンにしているとマウスのカーソルが消えてしまうようです。
|