データベースへの画像の保存と取得

image.save() は、画像の品質を (JPEG として保存した場合) 約 75% のデフォルトの圧縮レベルに低下させます。

この品質レベルを上げる方法については、この MSDN の記事を参照してください。myEncoderParameters を渡して Save を呼び出すと、はるかに高いレベル (たとえば 90%) の品質レベルが含まれます。

http://msdn.microsoft.com /en-us/library/system.drawing.imaging.encoder.quality.aspx

または、以下の (テストされていない) コードを参照してください。これでうまくいくはずです

    ' Create a a single encoder parameter envelope
    Dim EncoderParameters As New EncoderParameters(1)

    ' Create and add a single quality parameter to this envelope, specifying 95%
    Dim QualityParam As New EncoderParameter(Encoder.Quality, CType(95L, Int32))
    EncoderParameters.Param(0) = QualityParam

    ' Save the image with the encoder param specifying 95% quality
    _image.Save(_MemoryStream, _ImageFormat, EncoderParameters)