שינוי גודל הכתב

[n o o n e1]

שינוי גודל הכתב

שלום, אני רוצה לשנות את גודל הכתב של כל מה שאני שולח להדפסה על מנת שכאשר זה יוצא על הדף זה יהיה הרבה יותר גדול, מבלי לשנות את גודל הכתב בטופס. בתודה מראש,

 

[עצמונאי]

אז כך...

Printer.Font.Size = 25 Printer.Print "Size = 25" Printer.EndDoc​

בהצלחה

 

[n o o n e1]

שאלה נוספת

דבר ראשון תודה על התשובה השאלה שלי היא כאשר אני שולח הדפסה של תיבת טקסט ע"י הפקודה: Printer.Print Me.txtManual.Text גם כאשר הטקסט מופיע בכמה שורות בתיבה, בהדפסה זה מופיע בשורה ארוכה אחת(למעט ירידות שורה ע"י enter) שנחתכת כי היא יותר ארוכה מרוחב הדף. האם אפשר להגדיר את גודל הדף כך שזה ירד שורה באופן אוטומטי כשרוחב הדף נגמר או שצריך לשלוח להדפסה בפקודה שונה? בתודה מראש

 

[עצמונאי]

טוב אז כך

קודם כל כל פעם שאתה נותן פקודת PRINTER זה מדפיס שורה חדשה עכשיו אתה יכול לדלג שורה על ידי VBCRLF אני מקווה שזה עובד גם בהדפסה בהצלחה

 

[n o o n e1]

אני מדפיס את הכל בשורת פקודה אחת

לפי שורת הפקודה שכתבתי בהודעתי הקודמת אני מדפיס את כל תיבת הטקסט שמכילה הרבה שורות בפקודה אחת, אין לי יכולת להפריד בין השורות.