FoxPro/Visual FoxPro - ComboBox

 
Vista:

ComboBox

Publicado por Gabriel (427 intervenciones) el 19/05/2006 16:49:34
Amiga Esther :
La codificacion que te muestro la utilizo para verificar si el Valor Existe...

* Antes de Agregar nos seguramos que el valor no este en el COMBOBOX desplegable
IF nKeyCode = 13 && ENTER
lItemExist = .F. && Se supone que el valor no esta en la lista
FOR I = 1 To THIS.ListCount
IF Upper(This.List(I)) = Upper(Alltrim(THIS.DisplayValue))
lItemExist = .T. && Existe el Valor
Exit
ENDIF
ENDFOR

Ahora bien segun la codificacion que estas aplicando utiliza el siguiente.
En donde pones :

Thisform.ComBo1.Value cambialo por Thisform.Combo1.DisplayValue

Espero te sirva mis sugerencias...

Saludos,

GABRIEL
(Lima-Perú)
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder