viernes, 24 de julio de 2015

JUEGO DE LETRAS Y NUMEROS





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