Question

我想要过滤水晶报表查看器中的数据类型数据整数例如：年龄，但我的代码不起作用和CR引发错误消息。

下面是我的代码

Dim age As Integer 
    age = Val(TextBox1.Text) 
    Try 
     Me.CrystalReportViewer1.SelectionFormula = "{biodata.age} = '" & age.ToString & "'" 
     Me.CrystalReportViewer1.RefreshReport() 
    Catch ex As Exception 
     MsgBox(ex.Message) 
    End Try 

这是错误消息。

一个号在这里需要... 详情：....

是否有人可以指导我如何解决这个问题？

Answer 1

首先，张贴布拉布不建议。它只是复制粘贴的问题，所以不妨将完整的错误文本。

你的回答：

你的数据库字段{biodata.age}似乎是数字。在这种情况下，CR不喜欢你的“ToString”转换。您有2个选项：

1）删除代码中的ToString，并将“age”作为int。

Me.CrystalReportViewer1.SelectionFormula = "{biodata.age} = & age &)" 

2）如果你想继续使用age.ToString然后使用ToNumber(age.ToString)。这会将您的字符串转换为CR内的int。 像下面这样，我不确定vb的语法，但你不需要单引号。

Me.CrystalReportViewer1.SelectionFormula = "{biodata.age} = ToNumber(& age.ToString &)" 

检查字段是什么类型只需右键单击字段资源管理器中的数据库字段，然后选中显示字段类型。