BİR OLAY YORDAMINA YÖNLENE

 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.ComboBox1.DataSource = My.Settings.gecmis

        Me.WebBrowser1.Navigate(My.Settings.Anasayfa)
        Dim wbr As New WebBrowser
        AddHandler wbr.DocumentCompleted, AddressOf yuklemetamamlandi

    End Sub

 Private Sub yuklemetamamlandi()

        TabControl1.SelectedTab.Text = CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).DocumentTitle
        My.Settings.gecmis.Add((CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Url.ToString))
        Me.Label1.Text = CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).DocumentTitle
        Me.ComboBox1.Text = CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Url.ToString

    End Sub

arkadaşlar Form_Load olayına yazdığım  aşağıda ki koda göre  ""Private Sub yüklemetamamlandi() "" olay yordamına geçiş yapması lazımken bu olay yordamına geçmiyor acaba eksik yaptığım yer varmı?