Funcion en Crystal Report

[kpeando]

Estimados, quisiera pedirles ayuda con los siguiente.
estoy diseñando una aplicacion de impresion de codigos de barra y tengo la siguente linea en mi codigo:
codigo128(me.textbox1.text)
esta funcion codigo128(cadena)me devuelve los caracteres correctos y validados para usarlos con la font 128 (fuente de codigos de barra) y entregar por pantalla los codigos de barra hasta ahi todo bien ,pero debo imprimirlos en las etiquetas y para eso estoy usando el crystal report que viene con el visual studio 2008 sin embargo no se como agregarle la funcion al Crystal Report o que me imprima el text1, pueden ayudarme con esto.

[Dradi7]

para esto crea primero en tu crystal report un textobject y definilo con el nombre por ejemplo txtbarra
luego en tu formulario donde muestras supongo yo el informe con el crystal report
añade las librerias siguiente

CrystalDecisions.CrystalReports.Engine

luego este es el codigo para enviar el contenido de tu caja de texto al crystal

Código vb.net:

Dim Rep as new CrystalReportPrueba ' El nombre de tu crystal report creado
  For Each Obj As ReportObject In Rep.Section2.ReportObjects
                        If TypeOf Obj Is TextObject Then
                            If Obj.Name = "txtbarra" Then ' Este Campo del Reporte es para Mostrar el Tipo de Reporte
                                TryCast(Obj, TextObject).Text = txtprueba.Text ' aqui va el nombre de tu campo a enviar
                            End If
                        End If
                    Next
        CrystalReportViewer1.reportSource = Rep
 

Nota: este codigo va antes de llamar al reporte en tu crystalreportviewer

[kpeando]

Muchas Gracias......