There is no error message but when the code is stepped through there is no value for which leads me to believe that is the missing QE property. Private Sub DetailSection1_Format(ByVal pFormattingInfo As Object) Tried to do the same thing with CR XI using the same code and get a 'Can not find QE property' error message.Īlso tried putting this code in the report: If a record has a picture attached it shows on the report. MsgBox Err.Number & " - " & Err.Description MsgBox Err.Description, vbCritical, "No Photos" LoadPicture(Report.Sections("DetailSection3").ReportObjects("PicFile").Value) Set crSection.ReportObjects("Classmate").FormattedPicture = _ Private Sub crSection_Format(ByVal pFormattingInfo As Object) Private WithEvents crSection As CRAXDRT.Section Presently I am using vb6 & cr9 using this to change pictures for each record in a name tag report in the form containing the viewer:
0 Comments
Leave a Reply. |
Details
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |