日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

VB中使用PNG格式图片的一种新方法

發布時間:2025/3/20 编程问答 25 豆豆
生活随笔 收集整理的這篇文章主要介紹了 VB中使用PNG格式图片的一种新方法 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

由于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 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

總結

以上是生活随笔為你收集整理的VB中使用PNG格式图片的一种新方法的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。