ピクチャ（絵）を印刷する方法

◆概要

このページは、Visual Basicでピクチャ（絵）を印刷する方法について記載しています。


以下のコードは、Picture Box、ImageControl、Formまたは他のどのControlからも絵を印刷する方法です。

用紙上の絵の配置や絵のサイズを設定することができます。

準備

  1. フォームにコマンドボタン(Command Button)、ピクチャコントボックス(PictureBox)を追加します。
  2. Picture Box または印刷することを望む他のControlの名前で、下記の全ての「Picture1」を取り替えてください。
  3. 印刷する絵の調整をするには、下記の「0、0」を取り替えてください。
    「0、0」は、左上角で絵を印刷します。
    「0、0」の代わりに、"Printer.CurrentX" "Printer.CurrentY"を使ってください。
  4. 絵の大きさを大きくしたり、小さくしたいときは、"Picture1.Width","Picture1.Height"を変更してください。 例えば "Picture1.Width * 2" "Picture1.Height * 2"は２倍のサイズで絵を印刷します。"Picture1.Width * 0.5" "Picture1.Height * 0.5）"は、半分のサイズで絵を印刷します。
  5. 次のコードを入力します。 
Private Sub Command1_Click()
    Printer.PaintPicture Picture1.Picture, 0, 0, _
       Picture1.Width, Picture1.Height

    '印刷するのがこの絵だけなら、EndDocコマンドを使います。
     Printer.EndDoc

End Sub


▼ページトップへ