Dice
Código:
Do Until rs.EOF
combo2.AddItem rs2.Fields(0)
rs2.MoveNext
Loop
debe decir:
Código:
Do Until rs2.EOF
combo2.AddItem rs2.Fields(0)
rs2.MoveNext
Loop
Recodar que el rs2.Fields(0) hace referencia al campo primero pero tambien puedes colocar para no confundirte rs2.Fields("provincia")