Coba tambahin ini
    open "LPT1" for output as #1
    CPI0 = Chr(27) & Chr(64)                ' RESET PRINTER
    CPI12 = Chr(27) & Chr(33) & Chr(1)   ' 12 Cpi ESC !
    CPI20 = Chr(27) & Chr(33) & Chr(5)   ' 20 Cpi ESC !
    CPI17 = Chr(27) & Chr(33) & Chr(4)   ' 17 Cpi ESC !
    CPI15 = Chr(27) & Chr(103)           ' 15 Cpi ESC g
    Print #1, Chr(27) & Chr(33) & Chr(5)  --> Sesuaikan kebutuhan
   print #1, text10.text
   close #1


Thanks
Ronald Irawan
http://www.Foodinvestment.com/?id=ronald_delgeano
Jakarta



widay nila <[EMAIL PROTECTED]> 
Sent by: [email protected]
26/01/2007 10:50
Please respond to
[email protected]


To
indoprog-vb <[email protected]>, Programmer-VB 
<[email protected]>
cc

Subject
[indoprog-vb] Print Struk 2 kenapa fontnya  jadi gede banget yah ?






trimakasih dah pada ngebantuin nih jadi untuk masalah kertas udah beres
tapi ada satu masalah lagi nih yg timbul
kalo aku pakek perintah 
open "LPT1" for output as #1
print #1, text10.text
close #1
itu hasil fontnya kenapa jadi besar banget ( hasil di kertas fontnya 
seperti pakek FontSize 18

tapi waktu aku pakek perintah 
Printer.FontName = "Arial"
Printer.FontSize = "8"
Printer.Print Text10.Text
Printer.EndDoc
dengan font gak ada masalah

trimakasih

---------------------------------
Need a quick answer? Get one in minutes from people who know. Ask your 
question on Yahoo! Answers.

[Non-text portions of this message have been removed]

 


[Non-text portions of this message have been removed]

Kirim email ke