# Re: Printer.Print 在 vb 环境 下与编译成 exe 下列印资料格式无法对齐

Posted by 小v on May 22, 1999 at 15:37:25:

In Reply to: Printer.Print 在 vb 环境 下与编译成 exe 下列印资料格式无法对齐 posted by kscc on May 21, 1999 at 16:13:22:

: Private Sub Command1_Click()
: Dim readdata As String
: Open App.Path & "\aaa.txt" For Input As #1
: Printer.PrintQuality = 300
: Do While Not EOF(1)
: Line Input #1, readdata
: If Mid(readdata, 1, 1) = Chr(12) Then
: Printer.NewPage
: Else
: Printer.Print readdata
: End If
: Loop
: Close (1)
: Printer.EndDoc
: End Sub

: 上面是程式码,我在vb6.0 环境下列印aaa.txt (一般文字档含中英数字)格式为
: 对齐,但是编译成 exe 后,在windows 98 列印格式却无法对齐

列印之前先指定字形为细明体或标楷体再印
printer.fontname="细明体"

不可使用新细明体,否则一定无法对对齐
因为新细明体是所谓的"调和字",其每个字的宽度都不相同, 例如: W就比i胖得多多,所以会对不齐!

Follow Ups: