[0theghost0]

كود :

conn = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database1.accdb;Persist Security Info=False;")
       ds = New DataSet
       da = New OleDbDataAdapter("select Cus_Balance from Rent", conn)
       da.Fill(ds, "Rent")
       With ComboBox1
           .DataSource = ds.Tables("Rent")
           .DisplayMember = "Cus_Balance"
           .ValueMember = "Cus_Balance"
           If ComboBox1.Items.Count > 0 Then ComboBox1.SelectedIndex = 0
           .AutoCompleteMode = AutoCompleteMode.SuggestAppend
           .AutoCompleteSource = AutoCompleteSource.ListItems
       End With

حاولت اضيفه معه يطلع لي خطأ

الكود :

كود :

da = New OleDbDataAdapter("Select * From Return Where Cus_Balance <> 2", conn)