Buenas!
Soy nueva por el Foro, pero reconozco que me ha sido de mucha ayuda otras veces, para varias dudas que me han ido surgiendo.
Ahora me toca escribir, porque para esta no he encontrado ningún "problema real" pero no consigo hacer lo que realmente quiero.
Me gustaría comentaros el tema, y que me digais qué ideas se os ocurren para poder solventarlo.
La idea es el juego de hacer parejas. Una persona hace clic en una carta, se guarda su información en una variable y después hace clic en otra y se hace lo mismo. Si sus valores coinciden bien, sino mal.
Para ello tengo dos arrays de imagenes, uno que se llama cartas y tiene los valores de esas cartas y otro array de fondos para que la carta de abajo no se vea hasta que se haga clic.
Código:
If carta1Tag = "" Then ' Cojo la primera carta
carta1Tag = cartas(Index).Tag ' Guardo el Tag
carta1Index = Index ' Guardo su Index
picFondo(carta1Index).Visible = False ' Le digo que la imagen que tiene por encima no se vea.
Else ' ya hay una carta cogida anteriormente, repito como en la carta 1
carta2Tag = cartas(Index).Tag ' Cojo la segunda carta
carta2Index = Index
picFondo(carta2Index).Visible = False
If carta1Tag <> carta2Tag Then
' Aqui no puedo meter un Sleep
' Pero quiero quitar el msgbox de Incorrecto y que pase un segundo antes
' de que pase a la siguiente instruccion
'MsgBox ("Incorrecto")
picFondo(carta1Index).Visible = True
picFondo(carta2Index).Visible = True
'Vacio los valores del tag y del Index
Else
MsgBox ("Correcto")
' Vacio los valores del tag y el index
End If
End If
El problema que tengo es que al hacer clic en la segunda carta, y en caso de que no sean pareja sale directamente INCORRECTO en el msgbox pero no se llega a ver el dibujo en sí de la carta.
He probado con un Sleep y la imágen no desaparecia.
He probado con Timers pero me repetian algo cada X veces.
Lo único que necesito es que después de pinchar la segunda carta y que se vea la figura pase un segundo hasta que se verifica si son iguales o no.
Espero haberme explicado y que me podais echar un cable con alguna idea. Porque yo ya no sé qué mas probar. A lo mejor es por alguna tontería en la que no me estoy fijando , asi que una ayudita me vendría muy bien xD
Gracias por adelantado!