DrawTextでプリンターに出力するには？ (ID:101749)

名前

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

本文 K.J.K.さん ありがとうございます。 教えていただいたサイトのコードで、印刷が出来ました。 いま、コードを解読中なのですが、今まで印刷できなかったのは、 印刷開始の宣言 result = StartDoc(hPrintDc, di) 'Start a new print document result = StartPage(hPrintDc) 'Start a new page が無かったということでしょうか？ 試しに、 hPrintDc = CreateDC(Printer.DriverName, Printer.DeviceName, 0, 0) を ' hPrintDc = CreateDC(Printer.DriverName, Printer.DeviceName, 0, 0) として、 hPrintDc = Printer.hdc としても、印刷できました。 printer.print " " を行うと、裏で自動的に印刷開始の宣言をしているということでしょうか？