コンボドロップのサイズを変える

＜戻る

ここに載せてあるソースコードは、参考のために載せてあります

サンプルコードは、一番下にLZHとしてあります



Option Explicit

'追加ボタンを押しました
Private Sub Command1_Click()
    'テキストボックスの内容を
    'コンボボックスに追加します
    Combo1.AddItem Text1.Text
    
    'コンボボックスの横サイズを更新します
    RefreshDroppedWidth Combo1
    
End Sub

＜戻る

Sample93.lzh

http://hp.vector.co.jp/authors/VA015521/