Вопрос : Как напечатать новую страницу на vb.net

Hi,

I хочет суметь как напечатать вне только одну страницу?
Please помогает мне увеличить мое Кодего для того чтобы напечатать вне страницу
first будет страница TextBox1.Text
second будет abc

What def должно я сделать?

Thank вы!

Francis SZE class= " ясное " >

> " codeSnippet " class=

class= " lineNumbers "

class=

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27:

>Imports System.Drawing.Printing " class= " id= " codeSnippet856488

class=

Ответ : Как напечатать новую страницу на vb.net

доработайте это Кодего согласно вашей потребности
Но первый прогон это для проверки вашего выхода


ev.HasMorePages оценено only after т случаи получают законченными.
Если ev.HasMorePages = True после этого, то что случай снова
и на следующем беге ev.HasMorePages = ложно остановит сгореть тот случай.

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13:

тусклое isFirstRun как булевско = True Приватное Sub PrintText (прислужник ByVal как ev предмета, ByVal как PrintPageEventArgs) ' Приватные printpagesettings как новые PageSettings Если isFirstRun после этого ev. Graphics.DrawString (TextBox1.Text, новая купель («Arial», 11, FontStyle.Regular), Brushes.Black, 120, 120) ev.HasMorePages = True isFirstRun = ложно Еще ev. Graphics.DrawString («abc def», новая купель («Arial», 11, FontStyle.Regular), Brushes.Black, 120, 120) ev.HasMorePages = ложно Закончитесь если Закончите подводную лодку