UC知道如何在VB中使用PNG格式的图片
来源：百度知道 编辑：UC知道 时间：2024/06/05 21:19:42
我想在VB中做一个动画效果，可是VB的image控件不支持PNG格式的文件，而用bmp和jpg又没办法去掉图片的白色背景，那位高手帮下忙，告诉我怎样才能在VB中使用PNG的图片格式
我这里有个类 LoadPNG
类似的代码如下，仅
Filename = App.Path & "\test.png"
PicBox.Picture = LoadPicture("")'PicBox是PictureBox
Dim png As New LoadPNG
png.PicBox = PicBox
Test = png.OpenPNG(Filename)
If png.ErrorNumber <> 0 Then MsgBox "Error Nr. " & png.ErrorNumber
类的代码在附件
由于VB中的Image控件和Picture控件都不能直接加载PNG格式图片，使用或浏览PNG格式的图片带来了困难。现行的解决方法主要是以下两种：
（1）利用GDI显示PNG图片；
（2）将PNG格式图片制成swf格式的文件，再用Flash控件显示。
第一种方法效果好，但有些复杂，第二种方法不仅复杂，加载的已不是PNG格式图片了。其实PNG格式图片是能直接在WebBrowser控件里显示的，代码如下：view plaincopy to clipboardprint?
Private Sub Command1_Click()
On Error GoTo ERRLINE
CommonDialog1.ShowOpen
WebBrowser1.Navigate2 Co