Cómo programar en VISUAL FOXPRO para indicar en la sección condicional después de CASE que al presionar la tecla Q se sale automáticamente
case x = 'Q' amp; Supongamos que x es una expresión de carácter
Salir
case ....
ENDCASE
---------------------------------------- -- -------------
Lo siguiente es parte de mi software de alquiler
________________________________________________________
hacer caso
caso this.value=1 amp; nuevo precio unitario de alquiler
hacer sdl11 en .\abc
hacer formulario .\txt\frmsdl11
caso this.value=2 & precio unitario de arrendamiento completado
hacer sdl12 en .\abc
hacer formulario .\txt\frmsdl12
caso esto .value=3 amp;amp;Modificación del precio unitario del arrendamiento
hacer sdl13 en .\abc
hacer formulario .\txt\frmsdl13
caso this.value =4 amp;amp;Eliminar precio unitario de alquiler
hacer sdl14 en .\abc
hacer formulario .\txt\frmsdl14
caso this.value=5 o this.value=6 amp; entrada de cantidad de arrendamiento
do sdl15 en .\abc
do form .
case this.value=7 amp; ; amp; Mostrar cantidad de arrendamiento
do form .
case this.value=8 amp Modificación de la cantidad de arrendamiento
do sdl18 in .\abc< / p>
hacer formulario.
caso this.value=9 amp;eliminar cantidad de alquiler
hacer formulario.
caso this.value =10 amp ; amp; amp; Simulación mostrar cantidad de alquiler
DO FORM .\txt\frmsdl110
thisform.hide
formulario de informe .\txt\frxsdl110 .frx vista previa de pdsetup
thisform.show
case this.value=11 amp; impresión de la cantidad de alquiler
DOM .\txt\frmsdl110
thisform.hide
formulario de informe .\txt\frxsdl110.frx Entorno pdsetup para
imprimir mensaje noconsole
thisform.show
case this.value=12 amp amp; amp; Determine si hay una cantidad de alquiler de cadenas disponible
do sdl112 in .\abc
DO FORM .\txt\frmsdl112
case this.value =13 & visualización del número de llamada
DO FORM .\txt\frmsdl113
ENDCASE