La Web del Programador: Comunidad de Programadores
 
    Pregunta:  55383 - DATOS EN DOS TABLAS EN UN SOLO FORMULARIO
Autor:  Ana Blázquez Hernández
os pongo en situación: tengo dos tablas: clientes y provincias relacionadas por el campo NProvincia (en la tabla clientes) que es Código en la tabla de provincias.

En un formulario tengo que introducir y mostrar los datos de los clientes. Tienen que aparecer tanto el código de la provincia como el nombre de ésta. Si quiero modificar la provincia tengo que pulsar un botón que me lleva a la tabla de provincias, escojo la que corresponda y queda el valor del código correspondiente guardado en la tabla clientes y muestra tb el nombre de la provincia en el formulario

¿Cómo lo hago?

Espero haberme explicado bien y que me respondais pronto

No puedo meter los datos de la provincia en la tabla clientes porque tengo más tablas que necesitan provincias y me parece redundante tener esa información varias veces

Muchas gracias por adelantado!!!

  Respuesta:  Ana Blazquez Hernández
Al final lo he resuelto de una forma mucho más sencilla:

simplemente he creado un combobox basado en la tabla provincias, muestra el nombre de la provincia y devuelve el código de ésta.

tengo tb un textbox con el código de la provincia pero de la tabla clientes, poniendo lo siguiente funciona:

en esta parte lo que hace es coger el valor que hay en el textbos, que es el código que ha obtenido de la tabla clientes y se lo asigna al textBox

Private Sub NProvinciaTextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NProvinciaTextBox.TextChanged
ComboBox1.SelectedValue = NProvinciaTextBox.Text
End Sub

y en esta otra parte hace lo comentrario, es decir, toma el valor seleccionado en el combo y lo guarda en el textbox, como devuelve el código es justo lo que queremos mostrar:

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
NProvinciaTextBox.Text = ComboBox1.SelectedValue
End Sub

Gracias a todos, Ana