求大神指點vb.net 怎么把一張大圖 縮放到 和圖片框一樣大小顯示

PictureBox.SizeMode

創(chuàng)新互聯(lián)成立與2013年，先為臨洮等服務(wù)建站，臨洮等地企業(yè)，進行企業(yè)商務(wù)咨詢服務(wù)。為臨洮企業(yè)網(wǎng)站制作PC+手機+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。

屬性

默認情況下，在

Normal

模式中，Image

置于

PictureBox

的左上角，凡是因過大而不適合

PictureBox

的任何圖像部分都將被剪裁掉。

使用

StretchImage

值會使圖像拉伸或收縮，以便適合

PictureBox。

使用

Zoom

的值可以使圖像被拉伸或收縮以適應(yīng)

PictureBox；但是仍然保持原始縱橫比。

使用

AutoSize

值會使控件調(diào)整大小，以便總是適合圖像的大小。

使用

CenterImage

值會使圖像居于工作區(qū)的中心。

vb.net中怎么實現(xiàn)圖片縮小和放大

Pegasus的ImagXpress 8.0控件，支持各種格式文件的加載。控件封裝了右鍵局部區(qū)域放大的功能，要實現(xiàn)圖片的縮放，把AutoResize屬性設(shè)置為PegasusImaging.WinForms.ImagXpress8.AutoResizeType.CropImage，修改 ZoomFactor的值就可以了。

vb.net 如何放大和縮小圖片

Sub 圖片縮放()

Dim SngPer As Single = 1 '放大或縮小的比例 放大2倍時SngPer=2,縮小3倍時 SngPer=1/3

Dim PicOld As Image = Image.FromFile("原圖片路徑")

Dim PicNew As New System.Drawing.Bitmap(PicOld, PicOld.Width * SngPer, PicOld.Height * SngPer)

PicNew.Save("新圖片路徑", Drawing.Imaging.ImageFormat.Jpeg)

End Sub

在VB.NET下面如何顯示和保存縮放圖像

實現(xiàn)代碼如下：

Dim img As Image = Image.FromFile("D:\Image\tstImage.jpg") 'tstImage是原先的圖片

Dim grfx As Graphics = Me.CreateGraphics

grfx.DrawImage(img, 0, 0, img.Width * 3, img.Height * 3) '在Form里顯示

Dim imgnew As New System.Drawing.Bitmap(img, img.Height * 3, img.Width * 3) '新建一個放大的圖片

imgnew.Save("D:\Image\tstNewImage.jpg", System.Drawing.Imaging.ImageFormat.Jpeg) '保存放大后圖片

你可以建一個Form，然后在Form里拖進一個Button，把上面的代碼放在Button_Click事件里面，執(zhí)行就行了。

對上面代碼的解釋：

1.要獲取Graphics對象只能從某一事件的參數(shù)中獲取或者使用窗體和控件對象的CreateGraphics方法來獲取-----上面代碼使用Me.CreateGraphics來引用這個對象。

2.加載一個圖片用Image類的FromFile或者FromStream方法

3.用DrawImage來顯示一個圖片,該方法有30多個重載方法，可以查MSDN了解細節(jié)。

4.保存時的一個問題：我們必須先建一個對象，用于存縮放圖像。