Visual Foxpro

Tengo una duda para que al ingresar un numero me muestre su tabla de multiplicar del 1 al 10
Ya hice el condigo siguiente en un boton de comandos, mi duda es como le puedo hacer si tengo un cuadro de texto donde voy a esribir el numero del cual quiero la tabla de multiplicar, por ejemplo, escribo el 5 y que me muestre la tabla de multiplicar del 5 del 1 al 10
for i=1 to 10
for j=1 to 10
thisform.edit1.value = thisform.edit1.value + (alltrim(str(i)) + '*' + alltrim(str(j)) + '=' + alltrim(str(i*j)) + chr(13))
Endfor
Endfor

1 Respuesta

Respuesta
1
Pues si ya lo tienes. Sólo habría que agregar algunas cosas:
LOCAL lnNumero as Integer
lnNumero=VAL(thisform.text1.Value)
thisform.edit1.Value=""
for i=1 to lnNumero
for j=1 to lnNumero
thisform.edit1.value = thisform.edit1.value + (alltrim(str(i)) + '*' + alltrim(str(j)) + '=' + alltrim(str(i*j)) + chr(13))
Endfor
Endfor
Avísame

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas