jangan pake With langsung aja:
  Printer.FontName = "Courier New"
Printer.FontSize = "9"
Printer.Print rtfLap1.Text
Printer.EndDoc


dave-g <[EMAIL PROTECTED]> wrote:
          Mohon pencerahan. Saya membuat program cetak dari Rich Text Box dengan
perintah sbb:

With Printer
.FontName = "Courier New"
.FontSize = "9"
.Print rtfLap1.Text
.EndDoc
End With

Tapi program itu dijalankan error di baris :
.Print rtfLap1.Text
karena method data not found. Kenapa ya ???

Thanks before and after

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



         

                
---------------------------------
How low will we go? Check out Yahoo! Messenger’s low  PC-to-Phone call rates.

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



Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]

Bagi terjangkit virus lokal, zip virus tersebut
dan kirim ke [EMAIL PROTECTED], kami
akan membuat removalnya untuk anda. 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/indoprog-vb/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/indoprog-vb/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:[EMAIL PROTECTED] 
    mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Kirim email ke