VB2005/2008/2010(OCX)

○RDFドキュメントデータ設定後、フィールドの値を変更する例（帳票にページ番号を入れる）

'印刷を終了します。
Call Jvrlib.End()

'プレビューコントロールにRDFドキュメントデータを設定します。
Call JiveView.set_DocumentData(Jvrlib.DocumentData)

'ページ番号と総ページ数を全ページに入れます。
For i = 1 To JiveView.PageCount
　　JiveView.Page = i
　　Call JiveView.set_FieldData("ページ番号", CStr(i))
　　Call JiveView.set_FieldData("総ページ数", CStr(JiveView.PageCount))
Next i

'表示するページを指定します。
JiveView.Page = 1
'表示します。
JiveView.Show()