您所在位置：主题：打印定位问题
zjhyxjs
[专家分：0] 发布于 2010-01-12 16:25:00
做了个打印按钮，内容如下：
Private Sub Command1_Click()
Printer.CurrentX = 20 '这里边写左边距
Printer.CurrentY = 50 '这里边写上边距
Printer.Font.Name = 宋体 '这里是字体名
Printer.FontSize = 14 '这里是字体大小
Printer.Print Text1.Text '你要打什么
Printer.EndDoc '打印完成
End Sub
为什么总打印在左上角？不管我如何改变Printer.CurrentX = 20和Printer.CurrentY = 50 的数据，好像没有什么效果？
Private Sub Command1_Click()
Printer.CurrentX = 20 '这里边写左边距
Printer.CurrentY = 50 '这里边写上边距
Printer.Font.Name = 宋体 '这里是字体名
Printer.FontSize = 14 '这里是字体大小
Printer.Print Text1.Text '你要打什么
Printer.EndDoc '打印完成
End Sub
为什么总打印在左上角？不管我如何改变Printer.CurrentX = 20和Printer.CurrentY = 50 的数据，好像没有什么效果？
