嘗試使用外鍵從組合框中獲取數據並更新數據庫

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)