Wie Bild in vb.net Größe ändern

Question

Mein Code Bildgröße ändern, aber es kann nur Größe reduzieren.

For Each oFile In My.Computer.FileSystem.GetFiles(parm_strTargetPath) 
       If oFile.ToString.ToLower.Contains(".png") Or oFile.ToString.ToLower.Contains(".jpg") Or oFile.ToString.ToLower.Contains(".jpeg") Then 
        Dim strFileName = System.IO.Path.GetFileName(oFile) 
        Try 
         Dim original As Image = Image.FromFile(oFile) 
         Dim resized As Image = ResizeImage(original, New Size(h, w)) 
         Dim memStream As MemoryStream = New MemoryStream() 
         resized.Save(memStream, ImageFormat.Jpeg) 

         Dim file As New FileStream(result & "/" & strFileName , FileMode.Create, FileAccess.Write) 
         memStream.WriteTo(file) 
         file.Close() 
         memStream.Close() 
        Catch ex As Exception 

        End Try 

       End If 

      Next 

Meine Bildgröße: 1028x 172 möchte ich 500 x 500 die Größe aber Ergebnis ist eine Bildgröße: 500x84 Wie Resize Bild 1028x 172-500 x 500? Danke allen.

Answer 1

Dim resized As Image = ResizeImage(original, New Size(h, w), False) 

statt

Dim resized As Image = ResizeImage(original, New Size(h, w))