C# / VB.NET - riuscire a leggere un pulsante più volte in una form

Appunto, manca D = New Dictionary(...).

non riesco a capire come si gestisce:

Private Sub Home_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        i = 0
        corr = "RICEVIMENTO DOCENTI"
        Label1.Text = D(corr)(i)
        Me.BackgroundImage = My.Resources.back2
    End Sub
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles PictureBox1.Click
        i -= 1
        If i < D(corr)(0) Then
            i = D(corr)(0)
        End If
        Label1.Text = D(corr)(i)
    End Sub
    'incremento per bottone avanti
    Private Sub PictureBox5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox5.Click
        i += 1
        If i > D(corr).Length - 1 Then
            i = D(corr).Length - 1
        End If
        Label1.Text = D(corr)(i)
    End Sub

    'controllo tasto OK dei vari menu
    Private Sub PictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox3.Click
        If D.ContainsKey(D(corr)(i)) Then
            corr = D(corr)(i)
            i = 0
            Label1.Text = D(corr)(i)
        Else
            'azione specifica per una voce del menu
        End If
    End Sub

helpp meee

totem ti ringrazio tramite una documentazione sono riuscito a gestire il dictionary
ma la variabile string CurrentMEnu ho dovuto fare un vettore di stringhe di cui leggo l'indice comunque sempre semplice !! grazie mille per il tuo suggerimento!! alla prossima!!!