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

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 通常、プリント部分は独立した関数にします。 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 とします。