# Re: 谢谢 再问要如何在 vb6.0 中把要 页次(20) 当参数传给 Crystal report

Posted by 小蜜蜂 on March 30, 1999 at 02:19:54:

In Reply to: Re: 谢谢 再问要如何在 vb6.0 中把要 页次(20) 当参数传给 Crystal report posted by 炮笙 on March 29, 1999 at 09:24:48:

: : : 用 vb6.0 和 Crystal Report 如何让列印第一页显示
: : : 页次不要从一开始计算

: : 只要加入一formula就可以了.(若你想从第21页起)
: : formula之内容如下:

: : ToText (PageNumber+20,0)

VB 传给 Crystal Report 不是参数,而是整个formula
之内容,步骤如下:
1.先在Crystal Report中加入一空白之formula,假设为MyPage.
2.VB端程式如下:
Dim pp as Integer
pp=20
Report1.Formulas(0) = "MyPage=ToText (PageNumber+" & pp & ",0)"
Report1.Action = 1

Follow Ups: