投稿日 | : 2002/08/28(Wed) 16:41 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re: Comboリストの表示 |
簡単な方法なら
Say さんと同様にComboBoxのテキスト部にテキストボックスを重ねて貼り付け
下記のようにすればComboBoxの横幅を調整する事で 001 等は見えないし
後は目的により両方のイベントで取得できると思うのですが?
Private Sub Combo1_Click()
Text1.Text = Right$(Combo1.List(Combo1.ListIndex), 3)
End Sub
Private Sub Form_Load()
Combo1.AddItem "VBレスキュー(花ちゃん) 001"
Combo1.AddItem "VBレスキュー(花ちゃん) 002"
Combo1.AddItem "VBレスキュー(花ちゃん) 003"
End Sub