consulta q no hace nada

hola a todos!!

a ver si me podeis echar un cable en esta consultilla, q yo creo q esta

y no me da errores, pero...no hace nada.

Tengo una tabla llamada centros1 y un campo de la tabla llamado klave, q
tiene 6 digitos y se genera automaticamente, pero teniendo en cuenta el
codigo postal de la provincia a la q pertenece

Es decir:

Las de madrid son: 280000, 280001, 280002..

Las de valencia: 460000,0460001..

Las de barcelona: 080000,080001,080002..

El tema esta en q en el formulario para dar de alta, el usuario tiene q
introducir las 2 cifras del cp y al pulsar el boton generar, tiene q
generarse un codigo q será el siguiente al ultimo codigo de una

provincia, según lo explicado antes.

Es decir q si en castellon solo tengo 120000 y 120001, al generar un nuevo
codigo e introducir '12' se generara el codigo 120002

Explicado esto, os digo lo q he hecho a ver si podeis decirme pq no me
funciona:



Si cod.text es el textbox donde pongo las 2 cifras del cp

Y codi es el listbox donde quiero q aparezca el codigo generado

Si al pulsar el boton generar hago esta consulta..pq no me sale el codigo

el listbox???

(la funcion llenar_listbox funciona correctamente ya q la estoy usando en
toda la aplicación)

mysql = "SELECT TOP 1 CENTROS1.KLAVE "

mysql = mysql & "FROM CENTROS1 "

mysql = mysql & "WHERE (((CENTROS1.KLAVE) Like '" & cod.Text & "*" & "'))"

mysql = mysql & "ORDER BY CENTROS1.KLAVE DESC;"

Llenar_Listbox(mysql, CadenaConexion, codi)