HasMorePages=TRUE，分页打印失败了，内容重叠~~~

[snow_haoxue]

For i = 0 To Me.DataGridView1().Rows.Count - 1

            Dim row As DataGridViewRow = DataGridView1.Rows(i)

            If row.Cells(0).Value = True Then
                Dim n As Integer = 0
                Dim xEnd As Integer = 0

                ……      '绘制打印内容

                If yPos >= ev.PageBounds.Height - margin Then    '超出页面高度追加新的页面
                    ev.HasMorePages = True
                    yPos = margin_Top
                Else
                    ev.HasMorePages = False      '未超出当前页面情况下，不追加新页面
                End If

            End If

            If i = Me.DataGridView1().Rows.Count - 1 Then    '数据打印结束设置
                ev.HasMorePages = False
            End If
Next

以上代码，打印内容重叠在一个页面了，而且，打印页面数量始终是1页
请教各位，通过HasMorePages 的设置，一次打印动作中打印多个页面要怎么做？以上代码需要如何修改？
在这里先谢谢了

[兔子-顾问]

http://www.wewill.cn/n23686c47.aspx

[snow_haoxue]

终于搞明白了怎么回事了，对打印运行的逻辑理解有问题~~~

[allanli]

[Quote=引用 2 楼 snow_haoxue 的回复:]

终于搞明白了怎么回事了，对打印运行的逻辑理解有问题~~~
[/Quote]

你要换页必须是退出打印事件的
自己用全局变量控制打印到哪里

[pxesoft]

我来学习的.

[porschev]

[一克代码]

[Quote=引用 2 楼 snow_haoxue 的回复:]
终于搞明白了怎么回事了，对打印运行的逻辑理解有问题~~~
[/Quote]

有时间，自己解决了，才会明白好些东西！