リストボックスをクリックした時に選択したリストアイテムをテキストボックスに表示させるプログラムで、表示させるのは問題ないのですが表示したときにテキストを選択（反転）するようにしたいのですが、どのようにしたらよいのでしょうか？
編集 削除With Text1
.SelStart = 0
.SelLength = Len(.Text)
End With
nanashiさん、ありがとうございます。
教えていただいたコードをtext_clickの中に入れると、ちゃんとテキストボックスをクリックしたときに全部選択できるのですが、このコードをlist1_clickにいれてもうまくいかないんです。
リストボックスをクリックしたときに自動的にテキストボックスの中身を選択させたいのですが、すみませんがもう少し詳しく教えてください。
テキストボックスにフォーカスが当たってないのでは？
Text1.SetFocus
をlist1_clickに追加してみて下さい
たきさんのご指摘どおりでした。
これで無事に解決しました。
nanashiさん、たきさん、ありがとうございました。