タイトル : 印刷用紙設定について 投稿日 : 2008/07/11(Fri) 08:48 投稿者 : AMI
お世話になります。 先日は、クリスタルレポートの件ありがとうございました。 環境はVB2005+Access2000で開発しております。 その中で帳票印刷を「クリスタルレポート」を使用して行っております。 今回プリンタの「通常使うプリンタ」の設定を変更しようと、 たとえばプリンタの設定が縦設定になっているものを 「A4 横」に設定しようとおもっております。 調べたところ下記のコードがサンプルであったので 使用したところ、「通常使うプリンタ」の設定はかわりませんでした。 下記のコードは検討違いでしょうか? 宜しく尾根がします。 'Dim strPapaerSZ As String Dim pPaperSz As System.Drawing.Printing.PaperKind '用紙サイズ-'A3にする pPaperSz = Printing.PaperKind.A3 Dim pkSize As System.Drawing.Printing.PaperSize For Each pkSize In PrintDocument1.PrinterSettings.PaperSizes If pkSize.Kind = pPaperSz Then PrintDocument1.DefaultPageSettings.PaperSize = pkSize End If Next '用紙を横長に設定 PrintDocument1.DefaultPageSettings.Landscape = True |