私は非常に困難な仕事のように思われることに直面しています。PictureBox内で画像を15度ずつ回転させる必要があります。インターネットの奥深くを検索するのにかなりの時間を費やした後、私はこのタスクを達成するために何も見つかりませんでした。私が思いついた最も近いものは、以下を使用した90度の反転でした。
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
InitializeBitmap()
End Sub
Dim bitmap1 As Bitmap
Private Sub InitializeBitmap()
Try
bitmap1 = CType(Bitmap.FromFile("G:\Documents\Dawson\Semster 3\Visual Basic I\Test\subs\subs\Wheel.bmp"), Bitmap)
PictureBox1.SizeMode = PictureBoxSizeMode.AutoSize
PictureBox1.Image = bitmap1
Catch ex As System.IO.FileNotFoundException
MessageBox.Show("There was an error. Check the path to the bitmap.")
End Try
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
If bitmap1 IsNot Nothing Then
bitmap1.RotateFlip(RotateFlipType.Rotate90FlipXY)
PictureBox1.Image = bitmap1
End If
End Sub
画像を15度ずつ反転させるコードが必要です。それ以上でもそれ以下でもありません。
このコードを私に提供してくれる人は誰でも大歓迎です。御時間ありがとうございます。