Es decir que si al modificar (2), no hay ningun dato que se cumpla en el (1), me vuelva a repintar los datos.
He intentado a hacerlo de la siguiente manera
En 1, llamada al 2.
Código:
En el 2 para modificar los datosDim oCambioEstado As New frmCambioEstado oCambioEstado.ShowDialog()
Código:
Dim oPrincipal as new frmPrincipal oPrincipal.oConexion = New MySqlConnection oPrincipal.oConexion.ConnectionString = cadena_conexion 'crear adaptador oPrincipal.oDataAdapter = New MySqlDataAdapter("Select * from tabla1 where estado='AF' order by apellido1,apellido2,nombre desc", oConexion) 'Crear dataset oPrincipal.oDataSet = New DataSet oPrincipal.Open() 'llenar con el adaptador el dataset oPrincipal.oDataAdapter.Fill(oPrincipal.oDataSet, "tabla1") oPrincipal.oConexion.Close() 'establecer el indicador del registro 'a mostrar de la tabla oPrincipal.iPosicionActual = 0 oPrincipal.CargarDatos() oPrincipal.Update() Me.Close()