BIENVENIDOS A MI BLOG

Translate

viernes, 6 de febrero de 2015

CALCULADORA VFP 9.0

CALCULADORA

HOY APRENDEREMOS COMO HACER UNA CALCULADORA VIRTUAL EN VISUAL FOXPRO 9.0

VAMOS A HACER LA CALCULADORA EN  EN EL PROGRAMA VISUAL FOXPRO 9.0
UTILIZANDO LOS CONOCIMIENTOS APRENDIDOS EN CLASE 

1.- ABRIR EL PROGRAMA VISUAL FOXPRO 9.0
2.- PROCEDEMOS A INTRODUCIR EN DONDE QUEREMOS GUARDAR EL PROYECTO Y DIGITAMOS LO SIGUENTE EN LA VENTANA DE COMANDOS: 
                                   SET DEFAULT TO "D:\COMPU\APLICACIONES"
3.- AHORA DIGITAMOS LO SIGUIENTE:
                                   CREATE FORM PRIMERO 
4.- AHORA HACEMOS UN FORMATO CON EL DE LA IMAGEN



5.- EN CADA BOTÓN DE COMANDO DIGITAMOS LO SIGUIENTE:
thisform.text1.Value=thisform.text1.value+"1"
     NOTA: en cada comando hay que cambiar el valor del 1 al 9 
6.-EN EL BOTÓN "C" DIGITAMOS LO SIGUIENTE PARA BORRAR
THISFORM.TExt1.Value=" "
6.-EN EL BOTÓN IGUAL DIGITAMOS LO SIGUIENTE :
N2=VAL(THISFORM.TExt1.Value)
IF OPERACION="SUMA" THEN
RESPUESTA=N1+N2
ENDIF
N2=VAL(THISFORM.TExt1.Value)
IF OPERACION="RESTA" THEN
RESPUESTA=(N1)-(N2)
ENDIF
N2=VAL(THISFORM.TExt1.Value)
IF OPERACION="MULTIPLICAR" THEN
RESPUESTA=N1*N2
ENDIF
N2=VAL(THISFORM.TExt1.Value)
IF OPERACION="DIVIDIR" THEN
RESPUESTA=(N1)/(N2)
ENDIF
N2=VAL(THISFORM.TExt1.Value)
IF OPERACION="RAIZ CUADRADA" THEN
RESPUESTA=SQRT (N1)
ENDIF

THISFORM.TExt1.Value=RESPUESTA 
7.- AHORA PRESIONAMOS ESTE BOTÓN PARA EJECUTAR NUESTRA CALCULADORA

8.- AHORA UTILIZAMOS LA CALCULADORA 

x

2 comentarios: