コンボボックスの▼のサイズ変更

---

コンボボックスの右側にある
▼のサイズは変更できなませんか？
変更可能なコンポーネントはありませんか？

編集 削除

---

追加質問です。
縦方向はフォント変更で大きくなりますが、
横方向に大きくすることはできませんか？

編集 削除

---

そのようなコンポーネントは知りませんが、以下の方法でどうでしょうか？

・コンボボックスの右側のボタンの所に別のボタンを重ねる
・ボタンのクリックイベントでフォーカスをコンボボックスに移動して {F4}キーを送る

VB6でのサンプルです。
適当な場所にコンボボックス(Combo1)とコマンドボタン（Command1)を置いて、
コンボボックスのフォントサイズをいろいろ変えて試して下さい。

Private Sub Form_Load()
    '▼をボタンに表示
    Command1.Font.Name = "Marlett"
    Command1.Caption = "u"
    '▼の大きさをコンボボックスのフォントサイズに連動させる
    Command1.Font.Size = Combo1.Font.Size
    'コンボボックスのボタンの上に重ねる
    Command1.Height = Combo1.Height - 60
    Command1.Width = Command1.Height + 60
    Command1.Left = Combo1.Left + Combo1.Width - Combo1.Height
    Command1.Top = Combo1.Top + 30
    'コンボボックスより手前に表示
    Command1.ZOrder
End Sub

Private Sub Command1_Click()
    'フォーカスをコンボボックスの方に移動
    Combo1.SetFocus
    'ドロップダウンを出す
    SendKeys "{F4}"
End Sub

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。