AddTextObject to Crystal Report.

Hi all,
How can we specify fontname, fontsize when adding TextObject to Crystal report?

Call Report.Sections(3).AddTextObject("My string", 300,500)

Thanks.

Something like this......

make sure you have all your CRAXDRT definitions defined...



Dim crxApp As New CRAXDRT.Application
Dim crxReport As New CRAXDRT.Report
Dim myText As TextObject

Set crxReport = crxApp.OpenReport("C:\myReport.rpt", 1)
Set myText = crxReport.Sections(2).AddTextObject(myString, 400, 650)
With myText
.Font.Name = "Arial"
.Font.Size = 12
.Font.Bold = True
End With