VB.NET

Public Class Form1    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load    End Sub    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click        If Label1.Text = "* *" Then            Label1.Text = "^ ^"        Else Label1.Text = "* *"        End If    End Sub    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click    End SubEnd Class