画像を縮小するには？ (ID:142072)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ここは VB.NET も OK ですよ。 > 縮小率５０％（１０００→５００）の例 縮小画像の作成なら、GetThumbnailImage メソッドとか。 VB2008 ならこんな感じ。 Dim srcFile As String = "C:\〜〜\1000x1000.jpg" Dim dstFile As String = "C:\〜〜\500x500.jpg" Using src As New Bitmap(srcFile) Using img As Image = src.GetThumbnailImage(500, 500, New Image.GetThumbnailImageAbort(Function() False), IntPtr.Zero) img.Save(dstFile, Imaging.ImageFormat.Jpeg) End Using End Using VB2008 より前のバージョンのサンプルが良ければ、このあたり。 http://www.atmarkit.co.jp/fdotnet/dotnettips/559thumbnail/thumbnail.html