如何平滑地放大或缩小(Visual Basic)



我试着一步一步地放大或缩小图片,直到它填满屏幕。我的代码:而我<>数学。轮(ZoomFactor, 2)如果ZoomFactor>= 1,则I = I + 0.01ZoomPicture (1.01)其他的I = I - 0.01ZoomPicture (0.99)如果Me.PictureBox1.Update ()结束时私有子ZoomPicture(ZoomFactor)将较大的图像调为位图BiggerImage =新的位图(PictureBox1)。形象,PictureBox1.Image。宽度*缩放因子,picturebox1 .图像。高度*缩放因子)PictureBox1。Image = BiggerImage终止子

这工作,但变焦是有点不稳定(不光滑)。我希望它像电影一样(所以最小24变焦/秒)。

有更好的方法来实现这一点吗?但不要太复杂(我认为使用DirectX是非常复杂的,不是吗?)

非常感谢您提供的有用信息

Marc

我现在使用以下代码:

While PictureBox1.Image.Height < ScreenHeight And (Microsoft.VisualBasic.DateAndTime.Timer - StartTime) < ScreenSaverDuration
      PictureBox1.Image = New Bitmap(Image1, PictureBox1.Image.Width * 1.003, PictureBox1.Image.Height * 1.003)
      Me.PictureBox1.Update()
End  While

最新更新