[Resolvido]Dar Zoom em uma imagem

Olá,
Eu tenho um formulário onde carrega uma imagem, eu queria que tivesse um botão para ampliar essa imagem, mas não encontrei nada no fórum e nem no access.

Encontrei esse codigo Aqui para abrir no paint, mas gostaria de abrir no visualizador de imagem do windows, mas nao sei como chama o .exe

Código:

RetVal = Shell("MSPAINT.EXE" & Space(1) & CaminhoFotos & me.NomeCliente & ".jpg", 1)

Mas o que gostaria era de clicar em uma lupa e a imagem expandir.
Só não sei se é possível.

Para chamar o visualizador de img do windows e carregar a imagem:

Código:

    Dim Path As String
    Path = "C:\foto\fezinha.jpg"
    Shell "rundll32.exe C:\WINDOWS\System32\shimgvw.dll,ImageView_Fullscreen " & Path, vbNormalFocus

Caso tenha tempo amanha e ninguém tenha feito, faço um exemplo para carregar / salvar / visualizar no próprio form, botão para ampliar / reduzir a img carregada.
Abraço.

Bom dia formiga10x,
Já ajudou com a dica, no caso de ampliar no form é usando algum controle activeX?