Public Sub ReporteNcRecepcion_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim Reporte As New AvisoNc()
'Creo una instancia de la ventana donde se suministran los datos
Dim a As New AvisosNcRecepcion()
'aqui le digo a la variable q tome el valor que esta en el textboxt1 del formulario donde se suministran los datos y se lo paso a la formula para que se impriman en el reporte los datos mostrados en el formulario anterior
dim nombre as string= a.TextBox1.Text()
'CrystalReportViewer1.SelectionFormula = "{Carga.NombreB} =nombre
CrystalReportViewer1.Refresh()
CrystalReportViewer1.ReportSource = Reporte
Me.WindowState = FormWindowState.Maximized
End Sub