con il crystal report viewer creo un anteprima ella stampa di una text box presente in un altra form ma come devo fare allego il codice che ho fatto

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim r As New Stampa() 'report di stamap'

Dim a As New FWork() 'form dove si trova la texbox1'



r.DataDefinition.FormulaFields("nome").Text = "'" & a.TextBox2.Text & "'"
Me.CRViewer.ReportSource = r

Me.CRViewer.RefreshReport()
End Sub

autatemi se potete sono un novellino