图像缩放展示

图像缩放显示
就是图像太大了 要缩小显示在image控件中 急啊 求大哥们帮帮忙啊 ！！！！！！！！！1

[解决办法]
如果只是想视觉上小一点的话，可以在Imge的Paint事件中，DrawImage画上去，画到某个区域
[解决办法]
在.Net中你可以使用PictureBox控件，
将这个控件SizeMode属性改为Zoom即可。

[解决办法]
PictureBox控件SizeMode属性值的说明：

Normal：PictureBox控件可以改变大小，图片不能改变大小，图片的位置始终在控件的左上角；
StretchImage：当改变PictureBox控件的大小时，图片的大小改跟着改变（图片不是按比例进行缩放的）；
AutoSize：PictureBox控件和图片都不能改变大小，控件的大小和图片的大小一致；
CenterImage：PictureBox控件可以改变大小，图片不能改变大小，当改变控件大小时，图片的位置始终在控件中心；
Zoom：当改变PictureBox控件的大小时，图片的大小改跟着改变（图片是按比例进行缩放的）；

[解决办法]

VB.NET code

Dim pictrue As Bitmappictrue = New Bitmap("E:\NOKIA6300_00.jpg")'10和30是图片的位置，50和50是图片大小pic.CreateGraphics().DrawImage(pictrue, 10, 30, 50, 50)
[解决办法]
VB.NET code
  Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll        '缩放图示例参考 ,有待改进         Dim g As Graphics        Dim w As Integer = Me.Width * TrackBar1.Value * 0.0093        Dim h As Integer = Me.Height * TrackBar1.Value * 0.0078        Dim bm As New Bitmap(w, h)        Dim grph As Graphics = Graphics.FromImage(bm)        grph.Clear(Color.White)        grph.TranslateTransform(0, 0)        grph.ScaleTransform(TrackBar1.Value * 0.01, TrackBar1.Value * 0.01)        grph.DrawImage(Image.FromFile("E:\temp\2.jpg"), 0, 0)        g = Me.CreateGraphics        g.DrawImage(bm, 0, 0)        bm.Save("E:\bb.jpg", Imaging.ImageFormat.Bmp)    End Sub