用 VISUAL BASIC 实现图像的锐化处理.docVIP

用 Visual Basic 实现图像的锐化处理 谭阳，裴亮 辽宁工程技术大学测绘与地理科学学院，辽宁阜新（123000） E-mail：sunnycclucky@163.com 摘 要：本文介绍了一种实现图像锐化增强处理的原理，并在 Visual Basic 编程环境中实现。 关键词：图像；锐化；Visual Basic 1. 引 言 空间增强是有目的的突出图像上的某些特征，如突出边缘或线形地物；也可以有目的的 去除某些特性，如抑制图像上在获取和传输过程中所产生的各种噪声。空间增强的目的性很 强，处理后的图像从整体上看可能与原图像差异很大，但却突出了需要的信息或削弱了不需 要的信息，从而达到了增强的目的[1]。 为了突出边缘和轮廓，线状目标信息，可以采用锐化的方法。锐化可使图像上边缘与线 性目标的反差提高，因此也称为边缘增强。在本文中我将介绍一下对图像进行平滑和锐化的 原理，以及在 Visual Basic 中的实现。在 Visual Basic 中提供了较强的图形和图像的处理功 能，VB 通过使用颜色来进行对图像的处理，它可以获取像素的颜色，也可用颜色在窗体上 画点，对图像进行锐化处理的原理主要是从图像上获取某一像素的颜色,再对颜色进行模板 和卷积操作从而达到锐化的效果[2]。 2. 卷积运算 卷积运算是在空间域上对图像进行临域检测的运算。选定一个卷积函数，又称为“模板” 实际上是一个 M×N 的小图像，例如 3×3，5×7，7×7 等。图像的卷积运算是运用模板来实现 的[1]。 模板运算的方法是选定运算模板，其大小为 M×N。从图像的左上角开始，在图像上开 一个与模板同样大小的活动窗口 f(m,n)，使图像窗口与模板像元的灰度值对应相乘再相加。 计算结果 g(i,j)作为窗口中心像元的新的灰度值。模板运算的公式为  M m?1  N n?1  3. 图像平滑和锐化的原理 3.1 常用的锐化模板 锐化滤波通过增强高频成分减少图像的模糊，因此又被称为高通滤波。微分求导运算即 为一种高通滤波，它只记录图像的变化，而不保留图像的能量，在一般的增强应用中，锐化 滤波可以通过组合微分滤波器和原图像得到。常用的微分算子是拉普斯算子，它是一个二维 二阶微分算子，而且无方向性，定义为：  2 ? 2 f ( x, y) ?x 2  ? ? 2 f ( x, y) ?y 2 3?? 3的拉普斯卷积模板为： -1-  -1 -1 -1  -1 -1 9 -1 -1 -1 它相当于将原图像减去拉普斯运算的结果。应当注意的是锐化处理在增强图像边缘效果的同 时势必同时增加了图像的噪声。 3.2 颜色的获取和设置 获得图像上某一点的颜色值,可以用 Private Declare Function Getpixel Lib ”gdi320” Alias”Getpixel” (ByVal hdc As Long , ByVal X As Long , By Val Y As Long ) As Long 其中 hdc 是指对象的设备上下文，对象是放图像的 Picture 控件(不能是 Image 控件)。X， Y 是需获得颜色的点的位置。 用指定的颜色在窗体或图片框中画点，可以用 API 函数 SetPixel 函数，它的函数原型为 Private Declare Function Set pixel Lib ”gdi320” Alias ”SetPixel”(By Val hdc As Long, By Val hdc X As Long, By Val y As Long, By, Val crColor As long) As Long 其中 hdc，X，Y 参数与 GetPixel 函数中的相同，crColor 画点所需的颜色。在使用这两 个函数之前，在窗体的公共声明部分要声明[3]。 4. 图像在 Visual Basic 中的实现 4.1 定义锐化函数 锐化函数可以在模块中的公共声明部分定义，并且为了存储模板矩阵定义一个数据类型 Matrix(矩阵)。 Public Type matrix Items (-1To1,-1To1) As Integer End Type 再在模块中定义三个函数，Getrvalue，Getgvalue，Getbvalue，分别用于获得某颜色的 RGB 三个颜色分量。 Public Function getrvalue (color As Long) As Integer Getrvalur = color Mod 256 ‘获取颜色值的红色分量 End Function Public Function getgvalue (colorAsLong) As Integer Getgvalu