VB中使用GDI+进行图像缩放的实例

   VISUAL BASIC（VB）对图形图像的处理一直以来是弱项，并受到很多人的垢病。关于图形图像的放大缩小，一般使用PICTUREBOX的PAINTPICTURE方法来处理。但这个处理方法最大的问题就是图像的失真。比方说图像中原来有网格线的，处理以后网格线会丢失，处理效果不好。后来在网上找到几个材料，是关于GDI+的用法的。试验了一下，果然效果非凡。以下为程序处理的关键代码：

Private Type GdiplusStartupInput
    GdiplusVersion As Long
    DebugEventCallback As Long
    SuppressBackgroundThread As Long                                      
    SuppressExternalCodecs As Long
End Type
Private Enum GpStatus  'Status
    Ok