投稿日 | : 2002/12/29(Sun) 10:53 |
投稿者 | : kazu |
URL | : |
タイトル | : 指定位置に印刷するには… |
初心者ですので宜しくお願いします。
プリンターによって印刷開始位置が違いますが、どのプリンターでも
指定位置に印刷する方法はありますか?
例えば私のプリンターの場合は、オフセット?がX=3,Y=3 mm
ありますので……、
Private Sub locate(myObj As Object, X As Long, Y As Long, myStr As String)
Set myObj = Printer
With myObj
.ScaleMode = 6
.CurrentX = X - 3
.CurrentY = Y - 3
End With
myObj.Print myStr
End Sub
としています。自分のプリンターでは思った位置に印刷できますが、
他のプリンターではずれてしまいます。
何か、方法が、ありましたら宜しくお願いします。