vb 打印 坐标

开发票用呢
现在还有好多以前印好了格式的纸
所以现在只要让他把文本框里的数据打出来就行了,

请问怎么来打印呢,
Q:316714885
在线等
成功再奖励100分

2楼能不能详细点,最好举个例子,再加你分数好了

Set Printer = Printers(0) '设定打印机
Printer.ScaleMode = vbMillimeters '设定单位毫米

Printer.fontname = "宋体" '设定字体
Printer.Fontsize = 10
Printer.FontBold = False
Printer.FontItalic = False

Printer.CurrentX = 10 '设定文字的左边距10mm
Printer.CurrentY = 10 '设定文字的上边距10mm
Printer.Print "文字" '输出文字，输出后别忘了重新设定边距

'Printer.NewPage '新建一页

Printer.EndDoc '打印机输出

Printer.FontName = "宋体" Printer.FontSize = 16 Printer.FontBold = False '粗体 以上是打印内容字体设置 Printer.CurrentX = 130 Printer.CurrentY = 30 以上是对打印位值设定,指定打印的起始位置 Printer.Print "打印内容" 以上在指定位置输出文本 Printer.EndDoc 以上是送到打印机 直接把以上代码复到一个按钮事件中,你就可以在指定位置打印了,很简单的,试一下吧 Private Sub Command1_Click() Printer.FontName = "宋体" Printer.FontSize = 16 Printer.FontBold = False '粗体 Printer.CurrentX = 130 '这两个参数调位置 Printer.CurrentY = 300 '这两个参数调位置 Printer.Print "打印内容" Printer.EndDoc End Sub

form1.print 最简单的打印，把不需要显示出来的都隐藏了