VB.NET picturebox 內(nèi)繪圖完圖形放大縮小移動 鼠標控制 。比較笨看了VB的代碼不明白 求解

。net 不用api就行

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

縮放操作

Function 縮放(ByVal bitmap As Bitmap, ByVal 倍數(shù) As Single) As Bitmap

Dim w As Integer = bitmap.Width * 倍數(shù)

Dim h As Integer = bitmap.Height * 倍數(shù)

Dim tem As New Bitmap(w, h)

Dim g As Graphics = Graphics.FromImage(tem)

g.DrawImage(bitmap, New Rectangle(0, 0, w, h), New Rectangle(0, 0, bitmap.Width, bitmap.Height), GraphicsUnit.Pixel)

g.Dispose()

Return tem

End Function

鼠標滾輪事件 MouseWheel

MouseEventArgs.Delta 值可以判斷滾動方向

vb.net如何將JPG文件縮放至不大于指定的字節(jié)數(shù)

1.我有個思路可以嘗試一下：把一張字節(jié)數(shù)在280-300K的圖片用PS打開看看像素大小；

2.定義一個新的位圖，指定像素大小為上面得到的數(shù)據(jù)；

3.讀取你需要修改大小的JPG文件，然后按指定大小復(fù)制到上面新建的位圖，并保存為JPG格式

如何正確掌握VB.NET操作縮放圖像

C# GDI+編程之基礎(chǔ)篇 一、關(guān)于GDI+ 從本質(zhì)上來看，GDI+為開發(fā)者提供了一組實現(xiàn)與各種設(shè)備(例如監(jiān)視器，打印機及其它具有圖形化能力但不及涉及這些圖形細節(jié)的設(shè)備)進行交互的庫函數(shù)

vb.net PictureBox縮小

Me.PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage

Me.PictureBox1.Width = Me.PictureBox1.Width * 0.8

Me.PictureBox1.Height = Me.PictureBox1.Height * 0.8

'最簡單的縮小

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

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