dh,
command 
Print #1, Chr(16) 'Set To Doble Strike
Print #1, Chr(27) & Chr(33) & Chr(4) 'Set to Draft Condensat


akan membuat printer melakukan feet masing masing 1 line ,
anda boleh coba untuk menggabunggakan semua pemformattan text dalam satu line 
Misal :

 Print #1, Chr(16)  & "Buku Bacaan " & "Rp 25000"

semoga membantu , 
tapi maaf command ini belum di coba karena sekarang saya sudah tidak punya  vb6 





________________________________
From: syafruddin abubakar <syafruddin2...@yahoo.com>
To: Programmer-VB@yahoogroups.com
Sent: Wednesday, August 19, 2009 8:39:13 PM
Subject: [Programmer-VB] Set Top Margin Print Nota

  
DH,
Saya Ingin Print Nota dengan sintak dibawah ini
 

Private Sub PrintNota()
Dim i As Integer
Open Printer.Port For Output As #1
Print #1, Chr(16) 'Set To Doble Strike
Print #1, Chr(27) & Chr(33) & Chr(4) 'Set to Draft Condensat
Print #1, "Buku Bacaan " & "Rp 25000"
Close #1

End Sub

Tapi saya bingung bagaimana caranya untuk Set Top Marginnya, solalnya cetakan 
sekarang terlalu jauh dari Pinggir atas kertas sekitar 1,5 cm padahal saya 
maunya cuma 1/2 cm aja. Mohon pencerahan dari Rekan2 sekalian

Terima kasih
Udin


   


      

Kirim email ke