" PASOS PARA CREAR UN INFORME "

Para crear un informe, seguir los siguientes pasos:

1 Abrir la base de datos donde se encuentra el formulario a crear.

2 Hacer clic sobre el objeto Informe que se encuentra a la derecha de la ventana de la base de datos.

3 Hacer clic sobre la opción Crear un informe utilizando el asistente de la ventana de la base de datos.

4 Hacer clic sobre el botón Nuevo de la ventana de la base de datos.

5 Seleccionar Asistente para informes.

6 Hacer clic sobre la flecha del recuadro inferior para elegir a partir de qué tabla queremos realizar el informe.Nota: Se puede elegir también una consulta.

" PASOS PARA REALIZAR UNA CONSULTA "

1._ Abrir la base de datos donde se encuentra la consulta a crear.

2._ Hacer clic sobre el objeto Consulta que se encuentra a la derecha de la ventana de la base de datos.

3._ Hacer clic sobre el botón Nuevo de la ventana de la base de datos.Aparecerá el siguiente cuadro de diálogo:

4._ Seleccionar Vista Diseño.

5._ Hacer clic sobre el botón Aceptar.

6 Seleccionar la tabla a partir de la cual queremos realizar la consulta.

7 Hacer clic sobre el botón Agregar.

PROGRAMA PARA HACER UN CICLO CON UNA BASE DE DATOS

use c:\learnfox\emplistclear??do while.not.eof()?
proper(trim(fname)+" "
+iname)skipenddo?usewait

COMO COMBINAR UN CICLO "DO" Y UNA INTRUCCION "IF/ELSE"

use c\\earnfox\emplistclear?
wait "do you want the names capitalized (y/n)"
to yesno?do while.not.eof()
if upper (yes no)="y"?
upper (trim(fname)+" "+inameelse?proper(trim(fname)+"
"+inameend if skipenddo?usewait

PROGRAMA PARA CALCULAR LA VELOCIDAD FINAL

STORE O TO VF,VO,A,TRESP="S"DO
WHILE (RESP="S")
CLEAR@5,5 SAY "
INTRODUCE EL VALOR DE LA VELOCIDAD INICIAL" GET VOREAD@6,5 SAY "INTRODUCE EL VALOR DE LA ACELERACION"
GET AREAD@7,5 SAY "INTRODUCE EL VALOR DE TIEMPO" GET TREADVF=VO+A*T@8,5 SAY "VELOCIDAD FINAL="@8,12 SAY VF@8,30 SAY "M/SEG2"WAIT "DECEA OTROS CALCULOS/N?" TO RESPRESP=UPPER(RESP)ENDDOWAIT WINDOW "FIN DEL PROGRAMA"

PROGRAMA PARA ACCEDER A LA INFORMACION DE UNA BASE DE DATOS

store space(30) to productostore
space(15) to pesostore space(20) to preciostore
space(4) to codigostore space(15)to marcastore 0
to preciostore 0
to cantidadcod= spaceuse productos clear@5,5 say "introducir el codigo" get codreadlocate for cod=codigo@8,5 say"introduzca cantidad comprada" get cantidadt=cantidad*precio@9,5 say "producto:"@9,20 say producto@10,5 say "total:"@10,15 say twait