[Done]

PHP كود :

Public Class Form1

    Dim bitmap1 As Bitmap

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim dlg As New OpenFileDialog
        dlg.Title = "Choose Desktop background image"
        dlg.Filter = ""

        If dlg.ShowDialog = Windows.Forms.DialogResult.OK Then

            bitmap1 = CType(Bitmap.FromFile(dlg.FileName), Bitmap)
            PictureBox1.SizeMode = PictureBoxSizeMode.Zoom
            PictureBox1.Image = bitmap1

        End If

    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If bitmap1 IsNot Nothing Then
            bitmap1.RotateFlip(RotateFlipType.Rotate270FlipXY)
            PictureBox1.Image = bitmap1
        End If
    End Sub
End Class