尝试使用外键从组合框中获取数据并更新数据库

Question

I am trying to update my SQL database with the code provided, I am basically trying to take a select statement to bring back just the INTGenderID based on a combo box and make it equal to a string then convert that to an integer when I do my更新回我的数据库。 如果您需要更多信息，请告诉我。 主表是 TGolfers，父表是 TGenders。

Answer 1

我想我理解这个问题。 假设您有一个名为Thing的数据库表，其中包含ThingId和Name列。 您通常会查询数据库以填充DataTable ，然后将其绑定到您的ComboBox ，例如

Dim table As New DataTable

Using connection As New OleDbConnection(connectionString),
      command As New OleDbCommand("SELECT ThingId, Name FROM Thing", connection)
    connection.Open()

    Using reader = command.ExecuteReader()
        table.Load(reader)
    End Using
End Using

With thingComboBox
    .DisplayMember = "Name"
    .ValueMember = "ThingId"
    .DataSource = table
End With

用户现在将在ComboBox中看到Name值列表，当它们为 select 时，您可以从SelectedValue属性中获取相应的ThingId ，例如

Dim thingId = CInt(thingComboBox.SelectedValue)