Option Strict On

'VisualBasic2008 

Public Class Form1

    Protected Sub LinkLabel1_LinkClicked(ByVal Sender As System.Object, _

   ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) _

   Handles LinkLabel1.LinkClicked

        ' Show another form. 

        Dim f2 As New Form()

        f2.Show()

        LinkLabel1.LinkVisited = True

    End Sub



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

        Dim f2 As New Form()

        f2.Show()

        LinkLabel1.LinkVisited = True

    End Sub

End Class