numeros secuenciales

[emanuel233]

hola que tal--mi pregunta es---como generar numeros secuenciales con visual basic-------es para un sistema de venta.........cuando yo realize una venta este se guarde con un numero de venta-------- pero los numeros deben ser secuenciales no aleatorio----este numero se visualizara con un textbox---por ejemplo cuando yo abra la opcion de ventas en un textbox se genere un numero de venta--que permitira identificar una venta de otro como si fueran folios...o numeros de facturas----- y que me permita guardarlo en la base de datos.... ya he probado con varios codigo y nada......pido su ayuda
yo estaba poniendo el siguiente--pero no me genera nada

A = 1
While A <= 10000
ncontrol.txt = A
A = A + 1
Wend