打印机怎么调都是纵向？终于找到答案了VB编程之控制打印机的一些方法

' Sub InitPrint()'此函数用于首次测试打印机。请先呼叫我

如果将prin=2’设置为横向打印，并更改为1，则为纵向

将Prin=6 '单位设置为毫米

设置Prin=30 '左边距

设定Prin=30 '上方边界

设置Prin=300 '高度

设置Prin=200 '宽度

End Sub

“Subprint str (byval x as long，byval y as long，byval fnt size as integer，byval str as string)”此函数用于在指定位置以指定字体大小打印指定字符串

Prin=X '指定X坐标

指定Prin=Y' y坐标

“Prin=Fntsize”指定字体大小

打印字符串“Prin Str”

End Sub

Prin (X1，Y1)-可以使用(X2，Y2)' Printer对象中包含的方法打印直线

“Prin”也是Printer对象中包含的方法，可以在指定位置打印图片。

PaintPicture此方法的参数可以参考MSDN。有很多。我不会在这里说的。

当你调用这些函数和方法之后，最后还需要用：
Prin 这个方法来将你的最终结果打印到纸上，如果不用这个语句，你的打印机是不会打印的。