Article ID: 191215
Article Last Modified on 5/12/2003
Private Sub Command1_Click()
Printer.CurrentX = Printer.ScaleWidth / 2
Printer.CurrentY = Printer.ScaleHeight / 2
Printer.Print "Test" ' this works
Printer.EndDoc
With Printer
.CurrentX = Printer.ScaleWidth / 2
.CurrentY = Printer.ScaleHeight / 2
.Print "Test" ' this does not work
.EndDoc
End With
End Sub
Keywords: kberrmsg kbbug kbpending kbcode kbcompiler KB191215