dim p as Process = New Process
 
        Programm = Environment.GetEnvironmentVariable("windir") & _
          "\system32\rundll32.exe"
 
        Arguments = Chr(34) & _
          My.Computer.FileSystem.SpecialDirectories.ProgramFiles & "\Windows" & _
          "Photo Viewer\PhotoViewer.dll" & Chr(34)
 
        p.StartInfo.FileName = Programm
        p.StartInfo.Arguments = Arguments
 
        Process.Start(Programm, Arguments)

EALA FREYA FRESENA