[ Blue82 @ 07.05.2011. 15:57 ] @
Sta nije uredu sa ovim kodom? Zbog cega mi sve ispisuje na istoj strani umesto da ispise na 3 razlicite strane? Code: Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage Dim i As Integer For i = 1 To 3 e.Graphics.DrawString(Label1.Text, Label1.Font, Brushes.Black, 100, 200) If i < 3 Then e.HasMorePages = True Else e.HasMorePages = False End If Next i End Sub |