10.0报表的奇怪问题.

来源:互联网 发布:js replace函数 编辑:程序博客网 时间:2024/06/03 02:50

升级过程当中,原来是9.2中文版的报表,结果升级到10.0英文版后,报表上凡是放的文本框,用代码传值过去的,无论你给它设置什么对齐方式,它始终是左对齐,够变态了吧?但是用传参到页面它或者绑定字段则都可以按指令动作,保证设置的对齐方式。

还请达人与我共享解决办法..

另外提出需要注意的几点:

1,传参代码必须放到给报表绑定数据源之后,否则它会弹出要你输入参数值的提示窗口。

   Dim ds As New DataSet
        getDataSet(ds, "select top 20 * from cpk", "cpk")
        Rpt.SetDataSource(ds)
        Dim cl As TextObject
        cl = CType(Rpt.PageHeaderSection1.ReportObjects.Item("Text6"), TextObject)
        cl.ObjectFormat.HorizontalAlignment = CrystalDecisions.[Shared].Alignment.RightAlign '无效代码
        cl.Text = "aaaaaaaaaaaaaaaaa"

        Me.CrystalReportViewer1.ReportSource = Rpt
        Rpt.SetParameterValue(0, "bbbbbbbbbbbb")  '不能放在前面,否则会弹出让你输入参数值

搞不懂10。0为什么非要如此运作。

原创粉丝点击