这个代码是不是只能打一个，我就是想把窗体上的标签1的标题和标签2的标题和文本框的内容打出来打在一张纸的指定位置上，能不能用15楼的代码，代码越简单越好，打印的位置我自己调整

[此贴子已经被作者于2018-4-19 20:36编辑过]

谢谢，这个总体偏差是什么，不明白总体偏差xs ys有什么用，这xs ys都等于0？

[此贴子已经被作者于2018-4-20 22:50编辑过]

Public Sub prnt(X As Single, y As Single, txt As String, Optional fnt As Long = 12)
    Printer.CurrentX = X + XS + XLEFT       '打印位置，页边距+总体偏差+位置
    Printer.CurrentY = y + YS + YTOP
    Printer.FontSize = fnt
    Printer.Print txt
End Sub

这段代码是写在窗体里面还是模块里，还有页边距是不是可以去掉，直接写打印位置Printer.CurrentX = X 和Printer.CurrentY = y 不行吗

页边距和总体偏差不要的话，x和y数据类型定义什么类型，单精度浮点型还是变体型，不明白什么是单精度浮点型？

谢谢！！