Private Sub BasicLabel1_Click(sender As Object, e As EventArgs) Handles BasicLabel1.Click If BasicLabel1.Highlight Then FaultPage.Show Me.Hide() End IfEnd Sub