请问各位高手：在VB窗体中如何给水晶报表的参数字段赋值

我在水晶报表中新建了一个参数，命名为“ParameterName”，又在选择专家中使用了这个参数，现在我想在水晶报表预览前，在相关窗体上给该参数赋值，下面是我的代码：
Dim Report As CRAXDRT.Report  
Dim ado_Rst As New ADODB.Recordset
Dim ado_Cnn As New ADODB.ConnectionOption ExplicitPrivate Sub Form_Load()
Dim app_Report As New CRAXDRT.Application
Screen.MousePointer = vbHourglass
Set Report = app_Report.OpenReport("f:\Report\rpt_Parameter.rpt", 1)Report.SetReportVariableValue "ParameterName", "Alex"CRViewer91.ReportSource = Report
CRViewer91.ViewReport
Screen.MousePointer = vbDefaultEnd SubPrivate Sub Form_Resize()
CRViewer91.Top = 0
CRViewer91.Left = 0
CRViewer91.Height = ScaleHeight
CRViewer91.Width = ScaleWidthEnd Sub但是当执行到Report.SetReportVariableValue "ParameterName", "Alex"时报错，
时实错误‘70’
拒绝的权限
请各位高手指点，我该怎么改。