Visual Basic.NET - codigo de autonumeracion en visual 2008

Necesito crear un codigo de autonumeracion en visual 2008

tengo una base con una aplicacion de en visual 2008, el problema es que inicie una secuencia (ejemplo 300 - 350) pero ahora necesito seguir esa secuencia, al agregar nuevo me de el siguiente numero (ejemplo 351)


alguien me pueda ayudar

No entiendo lo que pedis

dim tr as integer=350


buton ..........

tr +=1



end buton


txt.text= tr

Estimados necesito de su apoyo como hago para extraer el utlimo registro de una tabla en access en este caso el codigo seria cod350, que utilizo para poder jalar este registro y cuando le doy clic en nuevo salga el cod351.
estoy utilizando vb2008 access 2010
a la espera de su ayuda.

dim PNumString as string
dim pNumInt as integer
dim Cad as string
Cad=Mid(Tucodigo,1,3)
PNumString=Mid(TuCodigo,4,3)
pNumInt=Convert.ToInt32(ONumString)
pNumInt=pNumInt+1
PNumString=Cad&PNumInt.Tostring

PNumString, ya tendrá la cadena Cod351

Esa es una manera muy simple, hecho desde esta web, no tengo visual studio ni nada.