Insertar IDs

[Avellaneda]

Iniciado por Strok3R

Hola, soy nuevo en VB2005, primero les explico lo que estoy haciendo y despues mi duda:

Estoy haciendo una aplicacion que registre personal y controle la asistencia de ellos.
Tengo una tabla cargo y otra empleado que posee la clave foranea de cargo.
En la interfaz de registro de personal tengo un combobox que despliega todos los cargos existentes (los nombres de éstos como es lógico, ilogico seria mostrar los id de estos).
Mi problema:
Entonces al seleccionar un cargo lo que poseo es 'nb_cargo' pero lo que debo insertar en la tabla empleado es el 'id_cargo', y eso es lo que no se hacer, al pasarlo como parametro paso el nb_cargo pero debo insertar el id_cargo. No se como seleccionar el id_cargo segun el nb_cargo que se haya seleccionado en el combobox, y si debo almacenarlo en una variable o no y Cómo. Espero que comprendan mi duda y puedan ayudarme. Saludos

Hola, lo puedes cargar en la propiedad ValueMember del Combo.
Te pongo un ejemplo:

Código:

Imports System.Data.SqlClient

Public Class Form1

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Try
            Dim cn As New SqlConnection("..aquí tu cadena de conexión..")
            cn.Open()
            Dim ds As New DataSet
            Dim da As New SqlDataAdapter("SELECT * FROM TuTabla", cn)
            da.Fill(ds, "Tabla")
            ComboBox1.DataSource = ds.Tables(0)
            ComboBox1.DisplayMember = "nb_cargo"
            ComboBox1.ValueMember = "id_cargo"
            TextBox1.Clear()

        Catch ex As Exception
            MsgBox(ex.Message.ToString)
        End Try
    End Sub


    Private Sub ComboBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.TextChanged
        Dim elId As String = ComboBox1.SelectedValue.ToString
        TextBox1.Text = elId
    End Sub
End Class