Comboリストで選択したものとその表示されるものが違うようにするには、どうしたらいいでしょうか
。
リストにて、「０１　りんご」と選択した場合にComboのテキストには、「０１」とだけ表示したいの
です。
よろしく、お願いいたします。

UserControlをつかって、
ComboBoxのText部分にtextBoxをかぶせた
複合ActiveXコントロールを自作してください。

簡単な方法なら
Say さんと同様にComboBoxのテキスト部にテキストボックスを重ねて貼り付け
下記のようにすればComboBoxの横幅を調整する事で　００１　等は見えないし
後は目的により両方のイベントで取得できると思うのですが？

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

ありがとうございました。
ご意見参考にさせていただきます。