如何VB在针式打印机上实现逐行打印？

Question

如题~~一直没有找到很好的解决方法，所以再次发贴讨教！
做销售时，输入一件的销售就打印一行，节省客人等候的时间。现在好像百佳、沃尔玛都是这样做的。

Answer 1

WIN98下能打印中文，WINXP下能打印英文字符及数字，打印机为EPSON针打：
Private Sub Command1_Click()
Open "LPT1" For Output As #1
For I = 1 To 5
    Print #1, Chr(10) '控制换行，同Chr(13)
Next
    Print #1, Chr(27); "IA"; "ABCDEFGHIJKL" '正常字体每行80字符"
    Print #1, Chr(14); "ABCDEFGHIJKL" '宽体每行40字符
    Print #1, Chr(27); "IA" '恢复正常字体
    Print #1, Chr(27); "IA"; "ABCDEFGHIJKL" '正常字体每行80字符"
    Print #1, Chr(27); "IB"; "ABCDEFGHIJKL" '横向扩展每行40字符
    Print #1, Chr(27); "IC"; "ABCDEFGHIJKL" '纵向扩展每行80字符
    Print #1, Chr(27); "E"; "ABCDEFGHIJKL" '加重黑体
    Print #1, Chr(27); "F" '取消加重黑体
    Print #1, Chr(27); "IA" '恢复正常字体
    Print #1, Chr(27); "4"; "ABCDEFGHIJKL" '斜体
    Print #1, Chr(27); "5" '取消斜体
    Print #1, Chr(27); "0"; "ABCDEFGHIJKL" '打印每吋6行改8行
    Print #1, Chr(27); "1"; "ABCDEFGHIJKL" '重置行间隔为7/72
    Print #1, Chr(27); "2"; "ABCDEFGHIJKL" '重置行间隔为1/6
    Print #1, Chr(27); "IA"; "ABCDEFGHIJKL" '正常字体每行80字符"
    'Print #1, Chr(12) '控制换页
Close #1
End Sub

Answer 2

这种打印方法需要安装打印机驱动程序,只支持本地打印机.
是不是要求打印机要有中文字库才可以打印中文呢？WINXP下使用Printer对象能打印中文,而直接用
Open "LPT1" For Output As #1Close #1
语句打印出乱码.