クリスタルレポートで改ページするには？ (ID:76233)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 すいません、変数の宣言を書くのを忘れました。 Dim count Dim maxcont Private Sub セクション10_Format(ByVal pFormattingInfo As Object) If pagenumber = 1 Then maxcount = 10 count = count + 1 If count < maxcount Then セクション10.NewPageAfter = ddNPNone If count >= maxcount Then セクション10.NewPageAfter = ddNPBefore count = 0 End If End Sub それと変数はグローバルでないといけないのでしょうか・・・？