サーマルプリンタ 90度回転 マージン

宜しくお願いします。
EPSONのサーマルプリンタ（レシート印字用）にて
90度回転で印字したとき（領収書など）
下のほうが印字できずに困っています。

＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
Public Const PTR_S_RECEIPT As Long = 2&
Public Const PTR_BM_LEFT As Long = -1&
Public Const PTR_BM_CENTER As Long = -2&
Public Const PTR_BM_RIGHT As Long = -3&
Public Const PTR_RP_NORMAL As Long = &H1&
Public Const PTR_RP_LEFT90 As Long = &H102&
Dim ESC As String * 1

ESC = Chr(&H1B)
With OPOSPOSPrinter1
　　　.Open "PR1"
　　　.ClaimDevice 1000
　　　.DeviceEnabled = True
　　　'高品位モードで出力
　　　.RecLetterQuality = True
'*** 印字
　　　' 左90度回転を指定
　　　.RotatePrint PTR_S_RECEIPT, PTR_RP_LEFT90
　　　.PrintNormal PTR_S_RECEIPT, ESC + "|4C" + ESC _
　　　+ "|bC" + "領収書" + vbCrLf
　　　.PrintNormal PTR_S_RECEIPT, "　行1　" + vbCrLf
　　　.PrintNormal PTR_S_RECEIPT, "　行2　" + vbCrLf

　　　　　　　　　　　　　　↓
　　　　　　　　　　　　　　↓
　　　　　　　　　　　　　　↓
　　　　　　　　　　　　　　↓

　　　' 回転モードを通常に戻す
　　　.RotatePrint PTR_S_RECEIPT, PTR_RP_NORMAL

　　　'ESC|#fP = カッター位置までフィード＆カット
　　　.PrintNormal PTR_S_RECEIPT, ESC + "|fP"
　　　.DeviceEnabled = False
　　　.ReleaseDevice
　　　.Close
End With
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊

と印字していきますと、下が２ｃｍ以上空いて
いるのに印字できなくなります・・・
マージン設定とかできるのでしょうか？？？

宜しくお願いしますm(__)m
　

No.1 ベストアンサー 回答者： kiki_s 回答日時： 2007/01/26 23:11

少し前に質問していませんでしたか？

プログラムだけではなく、ＯＳや開発環境、ハード構成も書かないと分からないですよ。
分かっても回答が出来るとは限らないですが。

なぜなら、市販の凡用プリンタならまだしも、サーマルプリンタなんて特殊ですからね。
専門的なところへ質問するか、メーカに問い合わせした方が良いと思います。

この回答へのお礼

ありがとうございましたm(__)m

お礼日時：2007/01/29 17:18