¿Cómo pasar datos entre formularios en Visual Basic .Net y Windows Forms?

hola, en esta ocasión pasaremos datos entre formularios, como primer ejemplo: pasaremos datos del formulario padre hacia un formulario hijo, como segundo ejemplo: pasaremos datos de un formulario hijo hacia el formulario padre, bueno es aquí donde la mayoría tiene problemas y esto es algo muy sencillo, por lo tanto será un tutorial corto.

Pasar datos del formulario padre al formulario hijo

Por ejemplo, supongamos que deseamos pasar datos de una fila de DataGridView del formulario lista de pacientes hacia los textboxs del formulario mantenimiento de paciente, mediante un boton de editar datos.

• Creamos el evento click del botón editar (Formulario Padre), abrimos el formulario mantenimiento de paciente (Formulario Hijo), y pasamos los datos necesarios.

    Private Sub btnEditar_Click(sender As Object, e As EventArgs) Handles btnEditar.Click
        If (DataGridView1.SelectedRows.Count > 0) Then
            Dim frm As New FormMantPacientes
            frm.txtid.Text = DataGridView1.CurrentRow.Cells(0).Value.ToString()
            frm.txtnombre.Text = DataGridView1.CurrentRow.Cells(1).Value.ToString()
            frm.txtapellido.Text = DataGridView1.CurrentRow.Cells(2).Value.ToString()
            frm.txtdireccion.Text = DataGridView1.CurrentRow.Cells(3).Value.ToString()
            frm.txttelefono.Text = DataGridView1.CurrentRow.Cells(4).Value.ToString()

            frm.ShowDialog()
        Else
            MessageBox.Show("Por favor seleccione una fila...")
        End If
    End Sub

Pasar datos del formulario hijo al formulario padre

Por ejemplo, supongamos que deseamos pasar datos de una fila de DataGridView del formulario lista de pacientes hacia los textboxs del formulario Agenda, mediante un boton de buscar paciente.

• Creamos el evento click del botón buscar paciente (Formulario Padre), abrimos formulario lista de pacientes (Formulario Hijo), especificamos que el formulario hijo es propietario del formulario padre, con el método AddOwnedForm().

    Private Sub btnBuscar_Click(sender As Object, e As EventArgs) Handles btnBuscar.Click
        Dim frm As New FormPacientes
        frm.lblHelp.Visible = True
        AddOwnedForm(frm)
        frm.ShowDialog()
    End Sub

• Una vez abierto el formulario hijo, pasamos los datos al formulario padre. En este caso pasaré los datos al hacer doble click en una celda del datagridview.

    Private Sub DataGridView1_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellDoubleClick

        Dim frm As FormAgenda = CType(Owner, FormAgenda)
        frm.txtid.Text = DataGridView1.CurrentRow.Cells(0).Value.ToString()
        frm.txtnombre.Text = DataGridView1.CurrentRow.Cells(1).Value.ToString() + ", " + DataGridView1.CurrentRow.Cells(2).Value.ToString()
        Me.Close()

    End Sub

Eso es todo 🙂

Ver video tutorial

Descargas

Ver Tutorial: GUI Moderno Usado