Cambiare DPI a una immagine con VB.NET

Mattepuffo's logo
Cambiare DPI a una immagine con VB.NET

Cambiare DPI a una immagine con VB.NET

Devo dire che fare alcune cose in VB.NET rispetto ad altri linguaggi competitors è veramente molto semplice.

Oggi vediamo come usare l'oggetto Bitmap per cambiare DPI ad una immagine.

Non ho fatto il controllo sulla eventuale esistenza del file di output; come non ho fatto altri controlli.

Ho semplcimente cambiato i DPI:

Imports System.Drawing
Imports System.Drawing.Imaging

Class Module1

    Public Shared Sub Main(ByVal args As String())
        Try
            Using bitmap As Bitmap = New Bitmap(Image.FromFile("C:\test.png"))
                Using newBitmap As Bitmap = New Bitmap(bitmap)
                    newBitmap.SetResolution(72, 72)
                    newBitmap.Save("C:\test_72.png", ImageFormat.Png)
                End Using
            End Using
        Catch ex As Exception
            Console.WriteLine(ex.Message)
            Console.WriteLine(ex.StackTrace)
        End Try
    End Sub

End Class

Considerate che io ho impostato il formato PNG, ma vale lo stesso con gli altri formati.

Enjoy!


Share this Post

Commentami!