Decisión Crucial

Páginas: 2 (366 palabras) Publicado: 10 de octubre de 2012
Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
PictureBox1.Visible = FalsePictureBox2.Visible = True
PictureBox3.Visible = False
PictureBox4.Visible = True
PictureBox5.Visible = False
PictureBox6.Visible = True
PictureBox7.Visible = FalsePictureBox8.Visible = True
PictureBox9.Visible = False
PictureBox10.Visible = True
PictureBox11.Visible = False
PictureBox12.Visible = True
End SubPrivate Sub PictureBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox2.Click
PictureBox1.Visible = True
PictureBox2.Visible = False
IfPictureBox1.Visible = True = PictureBox3.Visible = True Then
MsgBox("SON IGUALES")
PictureBox1.Visible = False
PictureBox2.Visible = FalsePictureBox3.Visible = False
PictureBox4.Visible = False
Else
PictureBox6.Visible = True
PictureBox8.Visible = True
PictureBox10.Visible = TruePictureBox12.Visible = True
End If
End Sub

Private Sub PictureBox4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox4.ClickPictureBox3.Visible = True
PictureBox4.Visible = False
If PictureBox1.Visible = True = PictureBox3.Visible = True Then
MsgBox("SON IGUALES")
PictureBox1.Visible= False
PictureBox2.Visible = False
PictureBox3.Visible = False
PictureBox4.Visible = False

End If
End Sub

Private SubPictureBox6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox6.Click
PictureBox5.Visible = True
PictureBox6.Visible = False
If PictureBox5.Visible = True =...
Leer documento completo

Regístrate para leer el documento completo.

Estos documentos también te pueden resultar útiles

  • decision crucial
  • Adolescencia, decisiones cruciales
  • Decisión Crucial Ensayo
  • Decision crucial resumen
  • Resumen decision crucial
  • analisis literario: decision crucial
  • Decision crucial
  • decisión crucial

Conviértase en miembro formal de Buenas Tareas

INSCRÍBETE - ES GRATIS