SI HOLA QUISIERA APRENDER A CODIFICAR SOY ESTUDIANTE DE PREPARATORIA :)
Y LA VERDAD ESTE PROGRAMA NO SE ME DA Y LOS EXAMENES VALEN UN BUEN DE VERDAD
SI ALGUIEN ME PUDIERA PROPORCIONAR INFORMACION O AYUDA
LE ESTARE AGRADECIDA POR EJEMPLO TENGO ESTA TAREA: ALGUIEN QUE ME PUEDA AYUDAR POR FAVOR.
TENGO QUE SUSTITUIT LOS NUMEROS EN LAS CAJAS DE TEXTO POR IMAGENES Y LA VERDAD NO SE ES COMO UN TIPO DE JUEGO :D el dibujito y viene la siguiente codificacion.
BUENO PRIMERO DESCRIBIRE EL OBJETO VIENE
ASI
TEXT 1 TEXT 2 TEXT 3
A JUGAR ------------- este es un command 1
LIMPIAR------------------este e sotro comand 2
DESPUES VIENE UNA CODIFICACION HELP ME :D
GENERAL
PRIVATE LIMSUP,LIMING AS INTEGER
PRIVATE CAJA1,CAJA2,CAJA3 AS INTEGER
PRIVATE VUELTA AS INTEGER
------------------------------------------------------------------------------------------------------------
PRIVATE SUB COMMAND1_CLICK
CAJA1=INT(LIMSUP-LIMINF +1)*Rnd+Liminf)
CAJA2=INT(LIMSUP-LIMINF +1)*Rnd+Liminf)
CAJA3=INT(LIMSUP-LIMINF +1)*Rnd+Liminf)
IF CAJA1=CAJA2 AND CAJA2=CAJA3 THEN
MSGBOX ¨GANASTE¨
ELSE
MSGBOX ¨PERDISTE INTENTA DE NUEVO
END IF
END SUB
----------------------------------------------------------------------------------------------------------
PRIVATE SUB FORM_LOAD()
LIMSUP=3
LIMINF=1
RANDOMIZE
END SUB
------------------------------------------------------------------------
PRIVATE SUB COMMAND2_CLICK
TEXT1.TEXT=¨ ¨
TEXT2.TEXT=¨ ¨
TEXT3.TEXT=¨ ¨
END SUB
-------------------------------------------
PFF ME CANSEE BUENOO ESPERO SUS RESPUESTAS PORFAA ME URGEN :D si son tan amables
de ayudarme graciasssssss