' تعریف متغیر برای ذخیره مسیر فایل عکس
Dim imagePath As String = "PATH_TO_YOUR_IMAGE_FILE"
' تعیین مسیر فایل عکس به پارامتر گزارش
rpt.SetParameterValue("ImageParam", imagePath)
' تغییر متن مدیر در گزارش
Dim modir As CrystalDecisions.CrystalReports.Engine.TextObject = CType(rpt.ReportDefinition.Sections(3).ReportObjec ts("txtmodir"), TextObject)
modir.Text = FrmMain.txtShModir.Text
اینگونه تست بفرمائید