怎样反转Image里的图片?

来源:百度知道 编辑:UC知道 时间:2024/05/04 20:43:23
怎样反转Image里的图片?

反转180度

Private Sub Form_Load()
Picture1.Visible = False
Picture1.AutoRedraw = True
Image1.Picture = LoadPicture("C:\WINDOWS\Web\exclam.gif")
End Sub

Private Sub Command1_Click()
Picture1.PaintPicture Image1.Picture, 0, 0, Image1.Width, Image1.Height, 0, Image1.Height, Image1.Width, -Image1.Height
Image1.Picture = Picture1.Image
Picture1.Cls
End Sub

是旋转还是翻转?