[RESOLVED] How to change text property of TextObject at run time

[sanjivani]

Hi,

I have to change text of TextObjects of Crystal Report. I tried it through following code, but it is not chaning its value.

Please help

Dim l_intIndex As Integer
    Dim objText
    Dim l_intReportSection As Integer
   
 
    For l_intReportSection = 1 To m_CrysReport.Sections.Count
    
        For l_intIndex = 1 To m_CrysReport.Sections(l_intReportSection).ReportObjects.Count
           
           Set objText = m_CrysReport.Sections(l_intReportSection).ReportObjects(l_intIndex)
 
            If TypeName(objText) = "ITextObject" Then
                 Set objText.SetText = "xyx"
            
            End If
 
        Next
    Next

~Sanjivani