10-07-20, 11:12 PM
السلام عليكم و رحمة الله و بركاته
قم بتعريف متغير بالكلاس و ليكن pn كمتغير رقمي صحيح
ثم ضع الكود الخاص بك بالشروط التالية
قم بتعريف متغير بالكلاس و ليكن pn كمتغير رقمي صحيح
كود :
Dim pn As Integer = 1ثم ضع الكود الخاص بك بالشروط التالية
كود :
Dim Fontsize As New System.Drawing.Font("Calibri (Body)", 12.03)
If pn = 1 Then
e.Graphics.DrawString(TextBox5.Text, Fontsize, Brushes.Black, 5, 11)
pn = 2
e.HasMorePages = True
ElseIf pn = 2 Then
e.Graphics.DrawString(TextBox8.Text, Fontsize, Brushes.Black, 5, 11)
pn = 3
e.HasMorePages = True
ElseIf pn = 3 Then
e.Graphics.DrawString(TextBox11.Text, Fontsize, Brushes.Black, 5, 11)
e.HasMorePages = False
End If