ピクチャーボックスの内容(画像じゃない)を印刷するには？

解決

APRIL 2002-08-16 02:36:59 No: 75970

VB6.0でユーザーコントロールを作成しているのですが
ユーザーコントロール内のピクチャーボックスの内容を簡単に印刷する方法ってありますか？
内容は画像でなく、全てPrintメソッドにて書いたテキストです

よろしくお願いします

たかみちえ URL 2002-08-16 04:37:06 No: 75971

Printメソッドで書いた文字であろうと、
PictureBoxに書いたものはすべて画像になります。
普通のペイントソフトを見てみればわかるとおり、
Printメソッドは、フォントの形をしたスタンプはりつけているわけです。

Say 2002-08-16 07:12:46 No: 75972

通常、プリント部分は独立した関数にします。

Private Function fncPrint(obj As Object) As Boolean
    obj.ScaleMode = vbPoints
    obj.Font.Size =  10
    obj.CurrentX = 10
    obj.CurrentY = 10
    obj.Print "あいうえお"
    .....
End Function

PictureBoxに表示するときは
Call fncPrint(Picture1)
印刷するときは
Call fncPrint(Printer)
Printer.EndDoc
とします。

APRIL 2002-08-16 23:40:54 No: 75973

たかみちえさん、Sayさん回答ありがとうございます

一度ピクチャーボックスに書きこんだものを、なにか一発メソッドを呼べば印刷できるかな？
と思って質問させて頂きました

Sayさんの方法でやってみます
ありがとうございました