ok try this. replace this code (at the end of the .doc file):

vb Code:
  1. 'set picture
  2. Dim myPicForm As New docViewerSubForm(newImage)
  3.  
  4. myPicForm.ShowDialog()

with this:

vb Code:
  1. Dim filename As String = My.Computer.FileSystem.GetTempFileName
  2. newImage.Save(filename, Drawing.Imaging.ImageFormat.Jpeg)
  3. Dim psi As New ProcessStartInfo("mspaint.exe", filename)
  4. Process.Start(psi)