asp.net ตัวอย่างการ resize รูปให้เป็นรุปขนาดเล็ก resize ทั้งขนาดและ size

		Dim objBitmap As Bitmap
		'*** Calculate Height ***'
		If intHeight > 0 Then
			objBitmap = New Bitmap(objGraphic, intWidth, intHeight)
		Else
			If objGraphic.Width > intWidth Then
				Dim ratio As Double = objGraphic.Height / objGraphic.Width
				intHeight = ratio * intWidth
				objBitmap = New Bitmap(objGraphic, intWidth, intHeight)
			Else
				objBitmap = New Bitmap(objGraphic)
			End If
		End If