Quiero vincular en mi base de datos información de clientes para generar formularios

Vamos ver:
Bueno pues tienes dos combos, uno con clientes otro con provincias, ¿vale?
Seleccionas en el combo el cliente pepe(no sabemos el código) y la provincia Burgos(no sabemos el código)
Private sub Insertar_Click()
Dim Prov as string ' guardara el codigo de provincia
Dim Clie as string ' guardara el codigo de cliente
dim sqlx as string ' tendra el string de insertar
Clie=Busca_Cod_Cli(Combo_Cli.text) ' buscamos el codigo de cliente
Prov=Busca_Cod_Prov(Combo_Prov.text) ' buscamos el codigo de prov
sqlx="INSERT INTO CLIENTES_PROVINCIAS " ' montamos insert
sqlx=sqlx & " (CODCLI,CODPROV)"
sqlx=sqlx & "'" & Clie & "','" & Prov & "'"
con.execute sqlx ' ejecutamos insert
End Sub
private function Busca_Cod_CLi(CliX as string) as string
' esta funcion busca la clave de clientes a traves de la desc
dim rs as new adodb.recordset
dim sqlx as string
sqlx="select * from clientes where nomcli='" & CliX & "'"
rs.open sqlx,conn
if not rs.eof
Busca_Cod_CLi=rs("CodCli")
end if
end sub
private function Busca_Cod_Pro(ProX as string) as string
' esta funcion busca la clave de provincias a traves de la desc
dim rs as new adodb.recordset
dim sqlx as string
' Suponemos que la clave de clientes y provincias es texto
' por eso ponemos comillas simples
' si fuera numérico no haría falta
sqlx="select * from clientes where nomprov='" & ProX & "'"
rs.open sqlx,conn
if not rs.eof
Busca_Cod_CLi=rs("CoPro")
end if
end sub

Muchísimas gracias ma has sido de gran ayuda, te pondré en mi lista de favoritos Campeón
Gracias otra vez

Ante todo muy buena la explicación se nota lo claro que la tienes, sabes como se hace para cargar un nuevo campo en una base.
Ejemplo con lo que me dijiste anteriormente selecciono un cliente y una provincia, y si lo quiero grabar en ena tabla que ya cree por ejemplo clientes-provincias
Gracias