タイトル | : ページ設定ダイアログを使わずに |
記事No | : 2674 |
投稿日 | : 2005/11/29(Tue) 17:13 |
投稿者 | : Nおう |
[OSのVer]:Windows2000 [VBのVer]:VB.NET2003
こんにちわ。色々と参考にさせて頂いてます。
ドットインパクトプリンタに印刷するプログラムを作成しております。 用紙は、ユーザ定義のサイズ(連続用紙)を使用しています。
印刷指示をした時に、プログラムから用紙サイズを選択させているのですが、 違う用紙サイズで印刷をしようとしてしまいます。 ("A3"に印刷しようとしているようで、用紙サイズエラーが起きます) なので、途中に"ページ設定ダイアログ"を使用してみたのですが、 そこで使用したい用紙サイズを指定すると、印刷は成功します。 (用紙の初期値として"A3"が選択されていました) ページ設定ダイアログを使わずにページ設定を反映させる 方法はありますでしょうか?御教授お願いします。
*以下、私が書いたコードです。 Friend PageSetting As New PageSettings
Dim SrcIdx as Integer Dim SizIdx as Integer
'使用するプリンタ PageSetting.PrinterSettings.PrinterName = "プリンタ名" '給紙方法の設定 PageSetting.PaperSource = PageSetting.PrinterSettings.PaperSources.Item(SrcIdx) '用紙設定 PageSetting.PaperSize = PageSetting.PrinterSettings.PaperSizes.Item(SizIdx)
PrDoc01.DefaultPageSettings = PageSetting
'============ページ設定ダイアログを使用 Dim PD As New PageSetupDialog PD.Document = PrDoc01 PD.ShowDialog() '====================================
If MsgBox("印刷を開始しますか?", MsgBoxStyle.YesNo, "確認") = MsgBoxResult.No Then ・・・以降、印刷処理・・・
|