Preview di uno Screensaver in un oggetto container

Per fare il preview di uno Screensaver in un oggetto container è possibile utilizzare il parametro /p dello stesso. Di seguito il codice per visualizzare uno Screensaver in una PictureBox:

Private Const ScreenSaverName As String = “ssbezier.scr”
Private screenSaverProcess As System.Diagnostics.Process

Dim startInfo As New System.Diagnostics.ProcessStartInfo
startInfo.Arguments = “/p ” & Me.PictureBox1.Handle.ToString()
startInfo.FileName = ScreenSaverName
startInfo.UseShellExecute = False
screenSaverProcess = System.Diagnostics.Process.Start(startInfo)

Per arrestare la visualizzazione dello Screensaver basterà terminare il processo:
screenSaverProcess.Kill()
screenSaverProcess.Close()
screenSaverProcess.Dispose()