I can get my printing to work in VB.net, except for one problem, I can't print multiple pages that are different. eg, continut in order from the overflow of the previouse page.

cause when I insert this code:
_____________________________
g.DrawString("Current Trade Data", Me.Font, Brushes.Black, 30 * scalex, 30 * scaley, New StringFormat())
g.DrawString("Options", Me.Label36.Font, Brushes.Black, 100 * scalex, 50 * scaley, New StringFormat())
g.DrawString("QUANTITY", Me.Font, Brushes.Black, 30 * scalex, 70 * scaley, New StringFormat())
g.DrawString("PRICE", Me.Font, Brushes.Black, 100 * scalex, 70 * scaley, New StringFormat())
g.DrawString("MtoM", Me.Font, Brushes.Black, 170 * scalex, 70 * scaley, New StringFormat())
g.DrawString("Cumulative", Me.Font, Brushes.Black, 240 * scalex, 70 * scaley, New StringFormat())
g.DrawString("BookingFee", Me.Font, Brushes.Black, 310 * scalex, 70 * scaley, New StringFormat())
g.DrawString("STRIKE_PRICE", Me.Font, Brushes.Black, 380 * scalex, 70 * scaley, New StringFormat())
g.DrawString("Con_TYPE", Me.Font, Brushes.Black, 450 * scalex, 70 * scaley, New StringFormat())
Dim ia, ib As Integer
Dim ll, tt As Short
For ia = 0 To contractOptions.Rows.Count - 1
For ib = 0 To contractOptions.Columns.Count - 1
ll = ((ib * 70) + 30) * scalex
tt = (((ia * 20) + 90) * scaley)
If (page * (560 * scaley)) < tt Then
ev.HasMorePages = True
page = page + 1
Else
ev.HasMorePages = False
End If
g.DrawString(ConDataGrid.Item(ia, ib), Me.Font, Brushes.Black, ll, tt, New StringFormat())
Next ib
Next ia

_____________________________
It just prints multiple pages of the same page.

I get the information out a data set.