FoxPro/Visual FoxPro - IMITACION EN VFP8 O VFP9

Hola amigos estoy con una duda que me encargaron.


Esto se trata de imitar una Tombola de la intruccion de varios numero selecionar al azar cualquier numero tipo mover una tombola.

Se puede??

Gracias.

¿Lo que necesitas es que el programa te envíe solamente el número al azar elegido de una lista o todo un diseño de una tombola girando?

CLOSE DATABASES
CREATE TABLE Random (cValue N(3))
FOR nItem = 1 TO 10
APPEND BLANK
REPLACE cValue WITH 1 + 100 * RAND( )
ENDFOR

CLEAR
LIST && Display the values
gnMaximum = 1 && Inicialisa el valor
gnMinimum = 100
SCAN
gnMinimum = MIN(gnMinimum, cValue)
gnMaximum = MAX(gnMaximum, cValue)
ENDSCAN
WAIT WINDOW 'Valor maximo: ', gnMinimum
WAIT WINDOW 'Valor minimo ', gnMaximum

CLEAR
gnLower = 1
gnUpper = 150

? INT((gnUpper - gnLower + 1) * RAND( ) + gnLower)


Suerte