Addhandler virker ikke !

Jeg har lavet nogle dynamiske linkbutton knapper til et datagrids paging, men jeg får bare ikke handler'en at execute dens tilhørende sub ?
Jeg har lavet koden andre steder, hvor samme kode fungerer. Koden til knapperne ser sådan ud.

Sub RenderPageButtons()
        Dim j As Integer

        phButtons.Controls.Clear()

        If Convert.ToInt32(dgItem.PageCount) > 1 Then
            For j = 0 To (dgItem.PageCount - 1)
                Dim lbPage As LinkButton = New LinkButton()
                lbPage.ID = String.Format("SUBPAGER{0}", j)
                lbPage.CommandArgument = j
                lbPage.CausesValidation = False
                lbPage.Font.Bold = False
                lbPage.Font.Size = FontUnit.Point(8)
                AddHandler lbPage.Click, AddressOf PagerButtonClick

                If j = dgItem.CurrentPageIndex Then
                    lbPage.Font.Bold = True
                    lbPage.Text = "(" & Convert.ToString(j + 1) & ")"
                Else
                    lbPage.Text = " " & Convert.ToString(j + 1) & " "
                End If

                phButtons.Controls.Add(lbPage)
                phButtons.DataBind()
                lbPage.Dispose()
            Next
        End If
    End Sub