高分请教：使用PUT打印到LPT1

Question

高分请教：使用PUT打印到LPT1时，POS打印机不会分行，请问输送什么字符打印回车的

Answer 1

你完全可使用
Open   "LPT1"   For   Output   As   #1 
    Print   #1,   Chr(10)   "控制换行，同Chr(13)
Close   #1
语句实现换行.以下代码能使用DOS环境下POS机.
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 
以上代码能使用DOS环境下POS机.
另请参阅http://topic.csdn.net/u/20070406/17/86bf1703-5fd2-4321-b2df-80e280b6c9ab.html我的答贴.

Answer 2

http://topic.csdn.net/u/20070406/17/86bf1703-5fd2-4321-b2df-80e280b6c9ab.html