Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
End If
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
PictureBox1.Image.Save(SaveFileDialog1.FileName)
End If
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Dim ReBMP As New Bitmap(PictureBox1.Image, 225, 146)
PictureBox1.Image = ReBMP
End Sub

Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click

End Sub
End Class




con questo sistema mi ritrovo una bmp ridimensioanta...son riuscito epr cui ad ottenere qualcosa...solo che io ne ho bisogno in .png...riesco anche a rinominarla in png...ma rimane una bmp, infatti la dimensione in byte aumenta e non diminuisce..
voi che mi dite...posso riuscire a comprimerla come png???



forse l'ho scovato da solo...

PictureBox1.Image.Save("c:\ciao.png", Imaging.ImageFormat.png)


è giusto???
adesso mi metto a rifinire il programma, dovrebbe essere giusto....