未绑定的组合框与数据库通信

Question

I have a table contain following columns:

*Id(int) *Name(nchar) *Type(nchar) *Description(nchar) The table is in online database. And I use a dataset.xsd file and connection string to communicate between client and the online database.

I have one Combobox with three item in it (Type1, Type2, Type2), I want to fill the database Table column "Type" base on the user selection result of Combobox. I don't know how to do that.

Here is some of the method I use:

`ADataSet = New DataSet
ATableAdapter = New DataSetTableAdapters.TableTableAdapter
ATableAdapter.Fill(ADataSet.Table) '(when loading)
ATableAdapter.Update(ADataSet.Table) '(when Editing or Adding)
ABindingSource = New BindingSource
`

Answer 1

Give this a try and give me some feedback

    ATableAdapter.Fill(ADataSet,"Your_Table")       
    Dim dsNewRow As DataRow
    dsNewRow = ADataSet.Tables("Your_Table").NewRow()    
    dsNewRow.Item(0) = ID
    dsNewRow.Item(1) = Name
    dsNewRow.Item(2) = Type
    dsNewRow.Item(3) = Desc
    ADataSet.Tables("Your_Table").Rows.Add(dsNewRow)
    ATableAdapter.Update(ADataSet,"Your_Table")
    MsgBox(ID & " has successfully been added to the system.")