vb.net 教程 5-16 图像处理之ImageAttributes 类1 伽玛、阈值和颜色替换

前端之家收集整理的这篇文章主要介绍了vb.net 教程 5-16 图像处理之ImageAttributes 类1 伽玛、阈值和颜色替换前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
@H_403_0@ ImageAttributes 类:包含有关在呈现时如何操作位图和图元文件颜色的信息
@H_403_0@ ImageAttributes使用简单,先是通过ImageAttributes 提供的方法快速处理图片颜色,再使用Graphics的DrawImage()方法指定imageAttributes参数即可。
@H_403_0@
@H_403_0@ 以下用代码方式来说明ImageAttributes 的一些方法使用代码前,必须 Imports System.Drawing.Imaging
@H_403_0@
@H_403_0@ 改变图像伽玛值,注意 典型值为 gamma 参数是从 1.0 到 2.2 ; 但是,往往在 0.1 到 5.0 的值可能会证明在某些情况下很有用,代码中使用的是0.5
    '伽玛
    Private Sub Button2_Click(sender As Object,e As EventArgs) Handles Button2.Click
        Dim destImg As New Bitmap(sourceImg.Width,sourceImg.Height)

        Dim imageAttributes As New ImageAttributes()
        imageAttributes.SetGamma(0.5F)
        Dim g As Graphics = Graphics.FromImage(destImg)
        g.DrawImage(sourceImg,New Rectangle(0,sourceImg.Width,sourceImg.Height),sourceImg.Height,GraphicsUnit.Pixel,imageAttributes)

        picDest.Image = destImg
    End Sub
@H_403_0@ 运行效果
@H_403_0@
@H_403_0@
@H_403_0@ 改变图像阈值, 阈值大小应介于 0 和 1,代码中使用的是0.7
    Private Sub Button3_Click(sender As Object,e As EventArgs) Handles Button3.Click
        Dim destImg As New Bitmap(sourceImg.Width,sourceImg.Height)

        Dim imageAttributes As New ImageAttributes()
        imageAttributes.SetThreshold(0.7F)
        Dim g As Graphics = Graphics.FromImage(destImg)
        g.DrawImage(sourceImg,imageAttributes)

        picDest.Image = destImg
    End Sub
@H_403_0@ 运行效果: @H_403_0@

@H_403_0@ 颜色替换:
    '颜色替换
    Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click
        Dim destImg As New Bitmap(sourceImg.Width,sourceImg.Height)

        Dim mycolormap(0) As ColorMap
        mycolormap(0) = New ColorMap()

        mycolormap(0).OldColor = Color.Black
        mycolormap(0).NewColor = Color.Red

        Dim imageAttributes As New ImageAttributes()
        imageAttributes.SetRemapTable(mycolormap)
        Dim g As Graphics = Graphics.FromImage(destImg)
        g.DrawImage(sourceImg,imageAttributes)

        picDest.Image = destImg
    End Sub
@H_403_0@ 运行效果: @H_403_0@

由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。

学习更多vb.net知识,请参看 vb.net 教程 目录

原文链接:https://www.f2er.com/vb/256638.html

猜你在找的VB相关文章