タイトル : Re^3: 印刷時の文字のバックカラー 投稿日 : 2010/04/13(Tue) 07:24 投稿者 : 花ちゃん
> 先ほどからこのレス見つけ試していたんですが・・ > もう一度やってみます。 注意事項を読んでいるのなら環境等を記入するようにして下さい。 この上にも、環境等が書かれていなかったり、速やかに返信されない質問は、 ここのルールを読んでいないと見なされ、レスが付きません。 と書いていますよね。 VB のバージョン、サービスパックはどうなっていますか? 一度下記を試して見て下さい。 (Windows Vista VB6.0(SP6) EPSON PM-A840) Private Sub Command1_Click() Dim H As Single, W As Single Printer.ScaleMode = vbTwips H = Printer.TextHeight("あ") W = Printer.TextWidth("あ") Printer.Line (W, H)-(0, 0), vbRed, BF Printer.CurrentX = 0 Printer.CurrentY = 0 Printer.ForeColor = vbGreen Printer.Print "あ" Printer.Line (Printer.TextWidth("あいう"), H * 1.5)-(0, H * 2.5), vbBlue, BF Printer.ForeColor = vbWhite Printer.CurrentX = 0 Printer.CurrentY = H * 1.5 Printer.Print "あいう" Printer.EndDoc End Sub |