質問です。
VB2008の通常のフォームでフォントをゴシックでサイズを11にしてデザインしています。

コンボボックスを貼ると高さが23でした。
DrawModeをOwnerDrawFixedに変更してItemHeightを35に変更しました。
テキストボックス部分がいい感じに太りました。

コンボボックスのDrawItemに
e.DrawBackground()
Dim brs As Brush = New SolidBrush(e.ForeColor)
Dim txt As String = CType(sender, ComboBox).Items(e.Index).ToString()
e.Graphics.DrawString(txt, e.Font, brs, e.Bounds.X, e.Bounds.Y)
brs.Dispose()
e.DrawFocusRectangle()
と書きました。

フォームのロードイベントに
ComboBox1.Items.Add("東京都" + vbCrLf + "新宿区")
ComboBox1.Items.Add("神奈川県" + vbCrLf + "横浜市")
と書きました。

これで実行してみるとリスト部分はきちんと改行されて表示されます。
しかし選択するとテキスト部分には改行が無視されて「東京都新宿区」と表示されます。
これをコピーしてメモ帳にペーストすると改行されて貼り付けられます。

テキストボックス部分の表示についてですが、
意図したとおりに改行されて表示されるようにするにはどうすればいいのでしょうか？

よろしくお願いします。