Crystal Reportsで数値項目をカンマ区切り+符号付きで表示するには?


モモ  2007-04-18 17:58:28  No: 136118

VB.NET2005+Crystal Reports For Visual Studio 2005です。
Crystal Reportsで数値項目をカンマ区切り+符号付きで
表示するにどうすればよいですか?
-------------------------------------------
(例)データ内容      表示内容
正の値「1000」  →  「+1,000」
0の値「1000」  →  「0」
負の値「-1000」 →  「-1,000」
-------------------------------------------
3つのコントロールを配置し、非表示の条件を使って
打ち分ける方法は可能ですが、それしか方法は
ありませんでしょうか。
何卒よろしくお願い致します。


daisei  2007-05-18 01:40:49  No: 136119

CrystalReportに、オブジェクト名が"txtValue"というテキストオブジェクトが貼り付けられているとして
VBの制御で出力フォーマットを変えればいいと思うのですが。

    Public Sub SetReportValue(ByVal intValue As Int64)

        Dim objCrystalReports As New CrystalReport
        Dim CrTxt As CrystalDecisions.CrystalReports.Engine.TextObject

        CrTxt = CType(objCrystalReports.Section3.ReportObjects("txtValue"), _
                      CrystalDecisions.CrystalReports.Engine.TextObject)

        If intValue > 0 Then    ' 正
            CrTxt.Text = String.Concat("+", String.Format("{0:#,##0}", intValue))
        ElseIf intValue < 0 Then  ' 負
            CrTxt.Text = String.Concat("-", String.Format("{0:#,##0}", intValue))
        Else            ' 0
            CrTxt.Text = intValue
        End If

  End Sub

だめでしょうか。


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加