Thanks for the suggestions, but for whatever reason, I still can't fill the combos. After poojavb's suggestion, the code I have is:
con.Open() 'load hotel dropdown Dim cmd As OleDbCommand = New OleDbCommand("SELECT Hotel FROM Hotels ORDER BY Hotel", con) rdr = cmd.ExecuteReader cmb_hotel.Items.Clear() While rdr.Read cmb_hotel.Items.Add(rdr("Hotel")) End While 'load restaurant dropdown cmd = New OleDbCommand("SELECT Rest_Name FROM Restaurants ORDER BY Rest_Name", con) rdr = cmd.ExecuteReader cmb_restaurant.Items.Clear() While rdr.Read cmb_restaurant.Items.Add(rdr("Rest_Name")) End While con.Close()
I don't see any reason why this shouldn't work. I've double checked to make sure I don't inadvertantly clear the combos elsewhere in the code, but I'm okay there. I honestly don't know what else to try. Is there anything else I can try?