FoxPro/Visual FoxPro - INCREMENTO EN UN TEXT

TENGO UN FORM DE MATRICULAS Y UNA TABLA DE MATRICULAS, NECESITO QUE EL CAMPO COD_MATRICULA QUE VA EN EL TEXT1 ME VAYA AUMENTANDO, ES DECIR COD_MATRICULA + 1, PARA QUE AL MOMENTO DE GUARDAR LA MATRICULA GUARDE EL NUMERO EN LA TABLA, COMO LO HAGO!
THANX!

PARA QUE AL MOMENTO DE GUARDAR LA

en el momento que guardes puedes utilizar

thisform.text1.codmatricula=thisform.text1.codmatricula+1

Suerte

QUE SE VEA EN EL TEXT AL MOMENTO DE EJECUTAR EL FORM CON EL INCREMENTO

En el Init..del form:

Evento Load
Select 1
use matriculas.dbf

Evento Init
select 1
go bott
Thisform.text1.value=clave+1
Thisform.text2.value=Nombre

Thisform.text1.Enabled=.f.

Thisform.refresh