sql - 如果保存了 id，则从 SQL 表中获取字段的值成员

Question

Private Sub Button9_Click_1(sender As Object, e As EventArgs) Handles Button9.Click
    Dim lst As List(Of String)
    ViajesExternos1.Visible = False
    Dim x As String
    x = InputBox("Por Favor Introduzca el Numero de Boleto:", "Actualización de Datos")
    MsgBox(x)
    If (Traerviajesexternos(x) Is Nothing) Then
        MsgBox("El Numero de Boleto no Existe")
    Else
        ViajesInternos1.Visible = False
        Viajeros1.Visible = False
        ViajesExternos1.Visible = True
        ViajesExternos1.labelinsertar.Visible = False
        ViajesExternos1.labelelimina.Visible = False
        ViajesExternos1.labelactualiza.Visible = True
        ViajesExternos1.botoninsertar.Visible = False
        ViajesExternos1.botoneliminar.Visible = False
        ViajesExternos1.botonactualizar.Visible = True
        Panel4.Visible = False
        Button10.Visible = False
        Button9.Visible = False
        Button8.Visible = False

        Try
            lst = Traerviajesexternos(x)
            ViajesExternos1.TextBox2.Text = lst.Item(0)
            ViajesExternos1.comboIDnombre.DisplayMember = lst.Item(1)
            ViajesExternos1.combodestino.DisplayMember = lst.Item(2)
            ViajesExternos1.combovuelo.DisplayMember = lst.Item(3)
            ViajesExternos1.combohotel.DisplayMember = lst.Item(4)
            ViajesExternos1.TextBox1.Text = lst.Item(5)
            ViajesExternos1.textsalida.Text = lst.Item(6)
            ViajesExternos1.textregreso.Text = lst.Item(7)
            ViajesExternos1.textpago.Text = lst.Item(8)
        Catch ex As Exception

        End Try
    End If
    bda.Close()
End Sub

我的问题是将数据带到组合框时...

至于在我的 sql 表中输入值，我使用 displaymember 和 valuemember，因为我输入外键直到一切正常，例如插入 1.2.3.4 并且用户在插入中看到名称和一切都很好. .

例如，当我想更新时，我想将 valuemember 带到组合框中，它不允许这样做，如果我放 .text 它会给我带来表具有的值并且我希望它是名称，就像我进入它时一样。

我使用模块中的选择将 try catch 中的值带入

标签： sqlvb.net