Comparador de caracteres vb.net

Dim Clave As String
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If TextBox1.Text = Clave Then
            TextBox1.Clear()
            Me.Hide()
            Timer1.Enabled = True
        Else
            MsgBox("Clave Incorrecta")
            TextBox1.Clear()
        End If

    End Sub
Compartir En Redes Sociales

Deja un comentario