Eli
16 de Diciembre del 2003

tengo dos cuadros de texto

1.-AL TECLEAR LA CLAVE EN EL TXTCLAVE LO ALMACENO EN UNA VARIABLE M.CLAVE

2.- EN EL TXTDESCRIP QUIERO QUE ME APARESCA LA DESCRIPCION DE ESTA CLAVE.

TENGO LA SIGUIENTE INSTRUCCION EN EL TXTDESCRIP EN EL EVENTO VALID

DESC=THISFORM.TXTCLAVE.VALUE
LOCATE FOR DESC = TITULOS.TITULO
IF FOUND()
THIS.VALUE=TITULOS.DESCRIP
ELSE
=MESSAGEBOX("NO EXISTE LA CLAVE")
ENDIF

PERO NO ME SALE UN ERROR ME PODRIAN AYUDAR A CORREGIRLO GRACIAS
SALUDOS A TODOS

Jose Luis
16 de Diciembre del 2003

Hola Eli...Este es un ejemplo que te puede servir. Saludos.

select 1
use tabla alias a
clave=thisform.txtclave.value
locate for val(clave)=a.cve_area
note se pone val solo si cve_area es numeric
if found()
thisform.txtdesc.value=a.nom_area
else
= messagebox("CLAVE NO ENCONTRADA")
endif