Visual Basic - Como generar numeros consecutivos?

Saludos..
soy nue vo en VB6 e intento crear un programa que genero los folios automaticos, estoy utilizando una Base de datos creada mediante el administrador visual de datos de VB, he creado la base con el campo de folio autoincrementable pero tengo problemas ya que cada vez que genero un nuevo registr se genera un numero de folio pero no se cancela, aun cuando no guarde el registro, el numero se incrementa? como puedo hacer, necesito un ciclo?
el folio lo intento meter en un textbox y esta en lazado mediante un data

espero me puedan ayudar lo antes posible
Gracias

probaste con un ciclo con una condicion exit sub
algo parecido a esto:

se genero el folio
para detenerlo poner una condicion
o usar exit sub para detener el incremento

Saludos:

Para comenzar... quitale la propiedad de autonumérico al campo. Estás dejando el control a la máquina cuando eres tú quien lo quiere y debe controlar.

Luego debés tener un par de métodos que se complementan:
1.-Saber cuál fue el último folio
2.-Incrementar el folio una vez obtenido

No dices en cuál base de datos estás trabajando, pero en cualquiera que sea debés encontrar una función que te devuelva el último número de folio usado. Comúnmente esa función es Max(<campo de la base>) u otra parecida.

Una vez que obtienes el útimo folio, sólo debés incrementarlo en uno y luego guardarlo en el registro correspondiente.

Hola a todos, no se mucho de access y estoy aprendiendo ... quiero generar un numero consecutivo en access pero no se como ... alguien me puede ayudar ...