Przechowywanie i pobieranie obrazów w bazie danych

Twój image.save() obniża jakość obrazu (jeśli jest zapisany jako Jpeg) do domyślnego poziomu kompresji około 75%.

Zapoznaj się z tym artykułem MSDN na temat zwiększania tego poziomu jakości, gdy dzwonisz Zapisz, przekazując myEncoderParameters, zawierający poziom jakości na znacznie wyższym poziomie (powiedzmy 90%)

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

Lub zobacz (nieprzetestowany) kod poniżej, który powinien załatwić sprawę

    ' 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)