Question

我是vb和水晶报告的新手，所以请帮助我解决问题。我正在使用vb代码将值分配给我的水晶报告中的公式字段。这是我的代码：

 Dim report As CrystalDecisions.CrystalReports.Engine.ReportDocument
        report = New report_Student()
        report.DataDefinition.FormulaFields("student").Text = "Slone" & Chr(13) & "Thompson"
        frm_print.viewerReport.ReportSource = report
        frm_print.viewerReport.RefreshReport()
        frm_print.Show()

我把它放在按钮点击事件中。现在我在运行它时遇到错误，在从查看器加载水晶报告之前，此错误显示：

The remaining text does not appear to be part of the formula.
Details: errorKind
Error in formula student:
'Slone
'

Answer 1

我猜你有公式字段（不是文本对象），你应该在那里使用公式：

    report.DataDefinition.FormulaFields("student").Text = _
        ControlChars.Quote + "Slone" + ChrW(13) + "Thompson" + ControlChars.Quote

因此，在结果公式中将包含一个文本文字（＆＃34; Slone \ nThompson＆＃34;）。

没试过这个，但希望它能够奏效。

如果没有，那么可能你需要使用CR内部函数ChrW（）以下一个方式换行：

    report.DataDefinition.FormulaFields("student").Text = _
        ControlChars.Quote + "Slone" + ControlChars.Quote + _
        " + ChrW(13) + " + _
        ControlChars.Quote + "Thompson" + ControlChars.Quote

因此，在结果中，两个文本文字（＆＃34; Slone＆＃34;和＆＃34; Thompson＆＃34;）将与CR内部函数ChrW（）的结果连接。

在CR公式编辑器中，它将显示为

    "Slone" + ChrW(13) + "Thompson"

但我希望第一种方式可行。

在VB的水晶报表中设置公式字段中的值

1 个答案: