Y mi duda es la siguiente:
Una vez que elegis la opción y ganás, perdés o empatas el programa se queda ahi. Probando y probando todavía no se me ocurrio como hacer para volver a preguntar si volver a jugar o no. Se que se haría con un bucle pero probé y todavía no lo saqué.
Pensé que funcionaría con la función load (para volver a cargar el form) pero no funcionó. Les dejo el código:
Código
Private Sub image1_Click() Frame1.Enabled = False imgpiedra.Visible = True Randomize (Timer) alea = Int((3 - 1 + 1) * Rnd + 1) If alea = 1 Then imgpiedra2.Visible = True ElseIf alea = 2 Then imgpapel2.Visible = True ElseIf alea = 3 Then imgtijera2.Visible = True End If If imgpiedra.Visible = True And imgpiedra2.Visible = True Then MsgBox ("EMPATE!!") ElseIf imgpiedra.Visible = True And imgpapel2.Visible = True Then MsgBox ("PERDISTE!!") ElseIf imgpiedra.Visible = True And imgtijera2.Visible = True Then MsgBox ("GANASTE") End If End Sub Private Sub image2_Click() imgpapel.Visible = True Frame1.Enabled = False Randomize (Timer) alea = Int((3 - 1 + 1) * Rnd + 1) If alea = 1 Then imgpiedra2.Visible = True ElseIf alea = 2 Then imgpapel2.Visible = True ElseIf alea = 3 Then imgtijera2.Visible = True End If If imgpapel.Visible = True And imgpiedra2.Visible = True Then MsgBox ("GANASTE!!") ElseIf imgpapel.Visible = True And imgpapel2.Visible = True Then MsgBox ("EMPATE!!") ElseIf imgpapel.Visible = True And imgtijera2.Visible = True Then MsgBox ("PERDISTE!!") End If End Sub Private Sub image3_Click() imgtijera.Visible = True Frame1.Enabled = False Randomize (Timer) alea = Int((3 - 1 + 1) * Rnd + 1) If alea = 1 Then imgpiedra2.Visible = True ElseIf alea = 2 Then imgpapel2.Visible = True ElseIf alea = 3 Then imgtijera2.Visible = True End If If imgtijera.Visible = True And imgpiedra2.Visible = True Then MsgBox ("PERDISTE!!") ElseIf imgtijera.Visible = True And imgpapel2.Visible = True Then MsgBox ("GANASTE!!") ElseIf imgtijera.Visible = True And imgtijera2.Visible = True Then MsgBox ("EMPATE!!") End If End Sub
Y la otra duda que tengo es que porqué una vez compilado y ejecutado varias veces, el proceso siempre queda abierto? Yo juego una partida, lo cierro y vuelvo a abrir y tengo el proceso anterior abierto. Les dejo una imágen.
Como ven, ya había cerrado el juego pero el proceso se seguía ejecutando. La verdad me parece rarísimo, nunca me había sucedido.
Esas son mis dos dudas, muchas gracias como siempre
Salu2!