1

プロジェクトで Crystal Report を使用しています。非常にうまく機能していますが、もっと柔軟にしたいだけです。テキストを含むテキストオブジェクトがあります。それらは私のレポートの単なる追加情報であるため、拘束されません。これらのテキスト オブジェクトを実行時に編集可能にするにはどうすればよいですか? マウスクリックのようなもので、ユーザーは私がデザインで行っているように編集できますか? プロジェクトにプログラムを追加する必要がありますか? 私はvb.net 2010を使用しています

このコードを使用してレポートを呼び出します

Dim sett As New DataSet1
Dim oRpt As New Accountability
Dim obj As CrystalDecisions.CrystalReports.Engine.TextObject
obj = oRpt.ReportDefinition.Sections("Section5").ReportObjects.Item("txtRel")
'Connection code, sql query here
Rpt.SetDataSource(dta)
frmReport.CrystalReportViewer1.ReportSource = oRpt
frmReport.CrystalReportViewer1.RefreshReport()
frmReport.Show()

編集する必要があるテキスト オブジェクトがバインドされていません。設計時に作成されます

4

2 に答える 2

4 
Private Sub Form1_Load(sender as Object, e as EventArgs) Handles MyBase.Load
    Dim oRpt As New Accountability

    frmReport.CrystalReportViewer1.ReportSource = oRpt
    frmReport.Show()
End Sub

Private Sub btnChangeText_Click(sender as Object, e as EventArgs) Handles btnChangeText.Click
    Dim oRpt As New Accountability
    ' Change the text of the TextObject you want to change here
    DirectCast(oRpt.ReportDefinition.ReportObjects("Text1"), TextObject).Text = "Your Text"
    DirectCast(oRpt.ReportDefinition.ReportObjects("Text2"), TextObject).Text = "Your Second Text"

    frmReport.CrystalReportViewer1.ReportSource = oRpt
    frmReport.CrystalReportViewer1.RefreshReport()
    frmReport.Show()
End Sub

これはあなたが必要とするものです！

于 2013-02-25T16:34:20.473 に答える