Visual Basic - Como Hago un textbox como numero correlativo

Necito saber como puedo hacer que un texbox muestre un numero despes del que ingresé es decir correlativo, por ejemplo ingreso el numero uno gravo y luego al refrescar me debe aparecer el dos y así sucesivamente

Despues de grabar, al refrescar (como dices) ...

Text1 = VAL(Text1) + 1

una Duda, estas usando alguna BD??, el valor tiene que guardarse al salir para luego al ingresar tomarlo nuevamente desde el ultimo cargado? Ahi cambiaria un poquito. Si es asi tendrias que leer la BD , mover al ultimo registro y sumarle uno, todo esto en el Load de tu form.
Cualquier cosa avisa ! Saludos

EJ:

dim ej as recordset
setej=bd.openrecordset("num_correlativos")
'pasar saber si tiene algun registro, es lo mismo que 'pregunto por el EOF o el BOF
if ej.recordcount>0 then
ej.movelast
txt.text=ej.field("num")+1
else'''''va a entrar una sola vez
'msgbox("no hay registros")'
txt.text="1"
end if

esto es siempre y cuando no allas eliminado ningun registro de esa tabla!!!!!
lo hice a las apuradas pero creo que seria algo asi!!