JUEGO DE LETRAS Y NUMEROS
Public Class Form1
Private Sub Button2_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles letrae.Click
Label1.Visible = True
Label1a.Visible = True
Label1b.Visible = False
Label2.Visible = True
Label2a.Visible = True
Label2b.Visible = False
Label3.Visible = True
End Sub
Private Sub numero3_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles numero3.Click
Label1.Visible = True
Label1a.Visible = False
Label1b.Visible = True
Label2.Visible = True
Label2a.Visible = False
Label2b.Visible = True
Label3.Visible = True
End Sub
Private Sub numero6_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles numero6.Click
Label1.Visible = True
Label1a.Visible = True
Label1b.Visible = False
Label2.Visible = True
Label2a.Visible = True
Label2b.Visible = True
Label3.Visible = True
End Sub
Private Sub Button1_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Label1.Visible = True
Label1a.Visible = True
Label1b.Visible = True
Label2.Visible = True
Label2a.Visible = False
Label2b.Visible = True
Label3.Visible = True
End Sub
Private Sub letrao_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles letrao.Click
Label1.Visible = True
Label1a.Visible = True
Label1b.Visible = True
Label2.Visible = False
Label2a.Visible = True
Label2b.Visible = True
Label3.Visible = True
End Sub
End Class
No hay comentarios:
Publicar un comentario