リストボックス内の文字を印刷するには?


ウォール  2003-06-22 12:57:09  No: 107582  IP: [192.*.*.*]

はじめまして、VisualBasic6.0を使っている超初心者です。
リストボックスの項目を印刷したいのですが、テキストと同じに
Printer.Print ListBox1.Text
Printer.EndDoc
としても、初めの1行目だけしか印刷されません。
自分のもっている本を見ても書いてなし、ヘルプも探しきれない状態です。
お分かりになる方、教えて下さい。

編集 削除
Say  2003-06-22 15:30:18  No: 107583  IP: [192.*.*.*]

ListBoxには、「中身をまるごと印刷する」機能が
ありませんから、そういうコードを自力で書く必要があります。

各行はListプロパティで参照できますから、
ループでまわしながら順次印刷してください。

編集 削除
ウォール  2003-06-23 01:12:20  No: 107584  IP: [192.*.*.*]

Sayさん、ありごとう御座います。
なんとか、こうにか、リストボックスの印刷ができました。^.^;
でも、どうも格好が良くありません。その一つ一つを線で囲みたいのですが
どうしたらよいでしょうか?
(Printer.Lineがありますが、ちょっと難しそうですね)
また、良きアドバイスお願いします。

For A = 0 To List1.ListCount - 1
Printer.Print List1.List(A)
Next A
Printer.EndDoc

編集 削除
Say  2003-06-23 09:25:13  No: 107585  IP: [192.*.*.*]

等幅系フォント(MSゴシック、MS明朝等)を用いて
ScaleMode=vbPointsにすれば、計算がやや楽になります。
PictureBoxでのプレビューもやりやすいでしょう。

編集 削除