由于VB中的Image控件和Picture控件都不能直接加载PNG格式图片,给我们使用或浏览PNG格式的图片带来了困难。现行的解决方法主要是以下两种:
(2)将PNG格式图片制成swf格式的文件,再用Flash控件显示。
第一种方法效果好,但有些复杂,第二种方法不仅复杂,加载的已不是PNG格式图片了。其实PNG格式图片是能直接在WebBrowser控件里显示的,代码如下:view plaincopy to clipboardprint?
Private Sub Command1_Click()
On Error GoTo ERRLINE
CommonDialog1.ShowOpen
WebBrowser1.Navigate2 CommonDialog1.FileName
ERRLINE:
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "about:blank"
CommonDialog1.Filter = "PNG图片(*.PNG)|*.PNG"
End Sub
Private Sub Command1_Click()
On Error GoTo ERRLINE
CommonDialog1.ShowOpen
WebBrowser1.Navigate2 CommonDialog1.FileName
ERRLINE:
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "about:blank"
CommonDialog1.Filter = "PNG图片(*.PNG)|*.PNG"
End Sub
这样你就可以随意浏览你电脑里的PNG格式的图片了。
本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/SYSSZ/archive/2009/06/03/4240062.aspx
原文链接:https://www.f2er.com/vb/262800.html