Hi
I have a VB6 form that adds/Edit/Delete records from an Access Database.
Inside this form I have a Report button that generates a Crystal report related to only the current record.
The code is
VB Code:
  1. Dim objCrystalApp As CRAXDRT.Application

  2. Dim oReport As CRAXDRT.Report

  3. rs2.Open "Select * from Btest where Flag=1 and BID=" & nar, cn, adOpenKeyset, adLockPessimistic

  4. rs2.Close

  5. Cancel = True

  6. Set objCrystalApp = New CRAXDRT.Application

  7. ReportPath = "C:\Book2\report4.rpt"

  8.  
  9.     Set oReport = objCrystalApp.OpenReport(ReportPath, 1)

  10.     oReport.RecordSelectionFormula = "{Btest.BID} =" & nar

  11.     frmreport.crvMyCRViewer.ReportSource = oReport

  12.     frmreport.crvMyCRViewer.ViewReport

  13.     frmreport.crvMyCRViewer.Refresh

  14.     frmreport.Show 1

  15. End If
my problem is that I have a checkbox whose caption is "Amended",if it is checked I want to add the word Amended inside a shaded Border into the generated report, if it is not checked i want to only generate the report.
how can I do it?
I am using Crystal Report 9
thanks