I wrote the following subrutin which will help you to refresh Second ComboBox based on the value selected on the first Combobox.
Just Copy this code in your application and call this method on ComboBox1_SelectedIndexChnged.
Public Sub FillCombo(ByVal idfiles As String, ByVal table As String, ByVal Combo1 As ComboBox, ByVal Combo2 as ComboBox)
objda.SelectCommand.CommandText = "Select " & idfiles & " FROM " & table & " Where FieldName=" & Combo1 & ""
Try
dr = objda.SelectCommand.ExecuteReader
Catch ex As OleDb.OleDbException
MessageBox.Show(ex.ToString)
ErrorLog(ex.ToString)
End Try
While dr.Read
Combo2.Items.Add(dr.Item(0))
End While
dr.Close()
End Sub
Example for calling above method
FillCombo("FieldName", "DatabaseTableName", ComboBox1,ComboBox2)