Access the crystal report text object in the code

Dim XReport As New CrystalDecisions.CrystalReports.Engine.ReportDocument
Dim LText As Object
XReport.Load(Server.MapPath(".\Reports\CrPrint.rpt"), CrystalDecisions.Shared.OpenReportMethod.OpenReportByDefault)
LText = XReport.ReportDefinition.Sections("Section5").ReportObjects("TxtCreatedBy")
LText.text = "Printed By : Gaurav Agrawal"