IGUAL PUEDES HACERLO AL MOMENTO DE GRABARLO A LA BASE DE DATOS CUANDO POR EJEMPLO:
RECORDSET.FIELDS(0)=UCASE(TRIM(TEXT1.TEXT))
O DE ESTA FORMA
RECORDSET!NOMBRECAMPO=UCASE(TRIM(TEXT1.TEXT))
PRUEBALO ES MAS FACIL Y TE EVITAS DE FUNCIONES ANTES DE GRABAR