Code does not work when I add Else

Dim h2 As HtmlElementCollection = Nothing
    h2 = W.Document.GetElementsByTagName("a")
    For Each elem As HtmlElement In h2

        If elem.GetAttribute("InnerText") = "See Others" Then
            elem.InvokeMember("Click")

Code is running. click on the. BUT CODE DOES NOT WORK I ADD "ELSE"

 Dim h2 As HtmlElementCollection = Nothing
    h2 = W.Document.GetElementsByTagName("a")
    For Each elem As HtmlElement In h2

        If elem.GetAttribute("InnerText") = "See Others" Then
            elem.InvokeMember("Click")

        Else
            W.Navigate(Form1.ListBox1.SelectedIndex + 1)
        End If
    Next

"Else" adding the code does not work. do not click