最近项目中有需要显示tiff图像,并且需要能够进行缩放和移动。用的vb写的,现在碰到一个问题是如何把vb中的image对象或者bitmap对象进行缩放后生成一个新的image或者bitmap对象。但是不知道在vb中是怎么弄的,我再网上看到很多用picturebox的paintpicture方法来实现,但是我没有看到这个方法不知为什么(用的vb.net)。哪位大哥如果知道方法,还望指导一下。最好速度快点的,一张图一般有50m大小。vb图片缩放tiffbitmap
调试欢乐多
Dim imgBuffer As Image = Image.FromFile("flower.jpg")
dim sglScale as Single=0.5 '缩小一半
Dim imgNew As New System.Drawing.Bitmap(imgBuffer, imgBuffer.Width * sglScale, imgBuffer.Height * sglScale)
me.pictureBox1.Image = imgNew