投稿日 | : 2003/07/14(Mon) 19:39 |
投稿者 | : tea |
Eメール | : |
URL | : |
タイトル | : 再度、印刷の質問 |
花ちゃんさんのご指摘通りに・・・
>3行目の10桁目に "あいうえお" と印刷してみて下さい。
>それができたら、その周りに罫線を引いて見て下さい。
を下記コードにて試してみました。
結果は確かに出来ましたが、罫線の枠に文字がうまく収まらない
というか文字の上部にはぴったりと罫線が引かさるのに対して、
文字の下部と罫線の間には「隙間」が出来てしまいます。
FontSizeを変えてみても変化がないようなんですが、この「隙間」
はどうにもならないものなのでしょうか?
教えてください。
Printer.ScaleMode = 4
CharX = Printer.TextWidth("あ")
CharY = Printer.TextHeight("あ")
Printer.CurrentX = 10: Printer.CurrentY = 3
Printer.FontName = "MS明朝": Printer.FontBold = True
Printer.FontSize = 16
Printer.Print "あいうえお"
Printer.Line (10, 3)-(22, 3)
Printer.Line (10, 5)-(22, 5)
Printer.Line (10, 3)-(10, 5)
Printer.Line (22, 3)-(22, 5)