printer对象如何设置上边距和下边距？请高手指点一二

Question

printer对象如何设置上边距和下边距？请高手指点一二

Answer 1

    没什么好设置的，打印时直接指定currentX、currentY的值就行了。

Answer 2

高度太长了（pos打印机的连续纸）如何让它小些？

Answer 3

设置纸张大小。printer.papersize

Answer 4

使用printer.newpage方法，强制换页。。

Answer 5

一个picturebox控件，一个commandbutton,两个textbox(其中text1用于控制左边距,text2用于控制上边距，其单位为缇，如果用厘米为单位，请自己转化）Private Sub Command1_Click()
        On Error Resume Next
        Printer.PaintPicture Picture1, Val(Text1.Text), Val(Text2.Text), _ Picture1.Width, Picture1.Height
        Printer.EndDoc
End Sub

Answer 6

Private Sub Command1_Click()
Printer.CurrentX = 1000    '坐边距
Printer.CurrentY = 1000    '右边距
Printer.Print "Fsdfsafdsa"
Printer.EndDoc
End Sub
这样好象就可以了啊，应该没什么问题吧

Answer 7

''设置打印范围
printer.height=8000
printer.width=4000''设置打印自定义坐标系统
printer.scale （0,0）-(8000,8000)Printer.CurrentX = 1000    
Printer.CurrentY = 1000    
printer.print "某某偶"
Printer.CurrentX = 100
Printer.CurrentY = 2000
printer.print "哦哦 哦哦：士大夫但是  士大夫：十分上"

Answer 8

楼上的有道理啊，不过就是要不断的调CurrentX.CurrentY啊。