Dim SourceImg As System.Drawing.Image = System.Drawing.Image.FromStream( Me .FileUpload1.PostedFile.InputStream) Dim SourceImgWidth As Integer = SourceImg.Width ' 图片的原始Width Dim SourceImgHeight As Integer = SourceImg.Height ' 图片的原始Height Dim bit As New Bitmap(SourceImg) Dim rec As New Rectangle() ' 构造一个Rectangle类,一个矩形 rec.Width = 100 ' ConfigHelper.UserFaceWidth rec.Height = 100 ' ConfigHelper.UserFaceHeight If SourceImgWidth > rec.Width Then rec.X = 20 ' (SourceImgWidth - rec.Width) / 2 Else rec.X = 0 rec.Width = SourceImg.Width End If If SourceImgHeight > rec.Height Then rec.Y = 20 ' (SourceImgHeight - rec.Height) / 2 Else rec.Y = 0 rec.Height = SourceImg.Height End If Try ' 这里就是把从上传过程中构造的bitmap克隆一份,并按定义好的矩形裁剪 bit.Clone(rec, PixelFormat.DontCare).Save(Response.OutputStream, ImageFormat.Jpeg) Catch ex As Exception Context.Response.Write(ex.Message) Exit Sub Finally bit.Dispose() SourceImg.Dispose() End Try 转载于:https://www.cnblogs.com/yanglin/archive/2007/06/28/799200.html