Public Class frmhideseek

    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbllanguage.Click

    End Sub

    Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click
        If lbllanguage.Visible = True Then
            lbllanguage.Visible = False
            btnDisplay.Text = "show name of language"

        ElseIf lbllanguage.Visible = False Then
            lbllanguage.Visible = True
            btnDisplay.Text = "hide name of language"
        End If









    End Sub

    Private Sub frmhideseek_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class