[Resolvido]Utilização do For Next

Bom dia a todos!

Srs,

tenho essa pequena formula que me retorna a foto do empregado (abaixo) no entanto ela não funciona em formulário contínuo, então a ideia seria de utilizar o for next 
mas eu não tenho a manha ainda... 


If Not IsNull(Localfoto) Then

Me.Imagem46.Picture = Me.Localfoto

Else

Me.Imagem46.Picture = ""


End If



exemplo de for next:

Código:

Dim Words, Chars, MyString
For Words = 10 To 1 Step -1    ' Configure 10 repetições.
    For Chars = 0 To 9    ' Configure 10 repetições.
        MyString = MyString & Chars    ' Acrescente número à seqüência.
    Next Chars    ' Incremente o contador
    MyString = MyString & " "    ' Acrescente um espaço.
Next Words


outro

Código:

Dim Found, MyObject, MyCollection
Found = False    ' Inicialize variável.
For Each MyObject In MyCollection    ' Itere através de cada elemento.
    If MyObject.Text = "Olá" Then    ' Se Text for igual a "Olá".
        Found = True    ' Defina Found como True.
        Exit For    ' Saia do loop.
    End If
Next


agradeço antecipadamente.

Opa! 

achei a solução neste:  ahttp://comunidade.itlab.com.br/eve/forums/a/tpc/f/273606921/m/1927050553


agora se alguém ainda souber me esclarecer a utilização do next vai ser melhor ainda


agradeço a todos até mais