tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルVB2005での印刷用紙設定
記事No4259
投稿日: 2006/09/14(Thu) 18:12
投稿者JOJO
お世話になります。
こちらのHPにあります印刷用紙サイズの取得及び設定を参考に

a = Printing.PaperKind.B4
PrtDoc = New PrintDocument
 With PrtDoc.PrinterSettings
  .PrinterName = wSetPrtD.PrinterSettings.PrinterName
   For Each b In wSetPrtD.PrinterSettings.PaperSizes
      If b.Kind = a Then
        .DefaultPageSettings.PaperSize = b
         Exit For
      End If
     Next

  .DefaultPageSettings.Landscape =
wSetPrtD.PrinterSettings.DefaultPageSettings.Landscape

  End With

という処理で用紙サイズの変更を行ったのですが
印刷物はA4で印刷されてしまいます。
デバックで確認したところ
.DefaultPageSettings.PaperSize にはB4が入っています。

どなたか用紙サイズの変更を教えていただけませんでしょうか?
これだけではわからないと思いますので、確認事項等があれば
随時書き込みますので、宜しくお願いします。

[ツリー表示へ]
タイトルRe: VB2005での印刷用紙設定
記事No4263
投稿日: 2006/09/15(Fri) 07:00
投稿者花ちゃん
> お世話になります。
> こちらのHPにあります印刷用紙サイズの取得及び設定を参考に

ここのサンプルをそのまま試しても同じように設定できませんか?
出来ないなら、プリンター名を含めた詳しい環境を教えて下さい。
できるなら、どこが違うかよく見比べて見て下さい。

[ツリー表示へ]
タイトルRe^2: VB2005での印刷用紙設定
記事No4265
投稿日: 2006/09/15(Fri) 11:43
投稿者JOJO
> > お世話になります。
> > こちらのHPにあります印刷用紙サイズの取得及び設定を参考に
>
> ここのサンプルをそのまま試しても同じように設定できませんか?
> 出来ないなら、プリンター名を含めた詳しい環境を教えて下さい。
> できるなら、どこが違うかよく見比べて見て下さい。
ほとんど丸々コピペでやってもできませんでした。

プリンターはネットワークプリンタでリコーをつかっております。
開発環境はWIN2KでVS2005でwindowsアプリで作成しております。
用紙サイズの設定を行った後

Dim Previewer As New PrintPreviewDialog
Previewer.Document = PrtDoc
Previewer.ShowDialog()
プレビューを出して用紙を見たところ
やはりまだB4に変わっておらずA4のままでした

[ツリー表示へ]
タイトルRe^3: VB2005での印刷用紙設定
記事No4266
投稿日: 2006/09/15(Fri) 12:45
投稿者花ちゃん
> ほとんど丸々コピペでやってもできませんでした。

一応動作確認はしておりますし、念の為今、B5 サイズ(A3のプリンターが故障中)で
印刷して確認してみましたがキチンと設定できております。

ほとんど丸々 ではなく下記をそのままを試して見て下さい。
http://hanatyan.sakura.ne.jp/dotnet/Prt08.htm

A4 サイズになっているとはどのようにして確認されたのですか?
(プレビュー画面では解らないはずですが)
A4サイズで印刷した場合とB4サイズで印刷した場合はどこが違いますか?
私のサンプルを使って試したのならTextBox にはどのように書いてありますか?
1行に全角で100文字程度書いて印刷してみた場合はどのようになりますか?
(B4=88文字 A4=70文字 おおよそ)
私のプログラムでは、プレビューで上記の文字数が表示されます。

又、印刷処理の部分はどのようにコードを書いていますか?
その時の用紙サイズの設定はどのようにしていますか?

他の用紙サイズ(B5等)で印刷した場合はどのようになりますか?
私のサンプルその物を使った場合で教えて頂けますか?

>プリンターはネットワークプリンタでリコーをつかっております。
ではプリンターの機種やトレイや権限等がどのようになっているか解りませんよね。

[ツリー表示へ]
タイトルRe^4: VB2005での印刷用紙設定
記事No4268
投稿日: 2006/09/15(Fri) 15:51
投稿者JOJO
> > ほとんど丸々コピペでやってもできませんでした。
>
> 一応動作確認はしておりますし、念の為今、B5 サイズ(A3のプリンターが故障中)で
> 印刷して確認してみましたがキチンと設定できております。
>
> ほとんど丸々 ではなく下記をそのままを試して見て下さい。
> http://hanatyan.sakura.ne.jp/dotnet/Prt08.htm

お返事ありがとうございます。そのままコピペさせていただいたところ
プリンターの用紙が変わりました。
こちらのコードの記述がおかしいことがわかり、現在検証しております。
お手数をおかけいたしまして、申し訳ございません。

大変助かりました。また質問等ありましたら投稿させていただきます。

ありがとうございました。

[ツリー表示へ]