狠狠色丁香婷婷综合尤物/久久精品综合一区二区三区/中国有色金属学报/国产日韩欧美在线观看 - 国产一区二区三区四区五区tv

比如用到了一個swf文件，如何在生成可執(zhí)行文件時包含它，注意：不是制作安裝程序!

我用的是vb6.0 可以把你的代碼解釋下嗎？我是新手！

制成資源文件： 

1、（菜單欄）外接程序——外接程序管理器——加載VB 6 資源編輯器 
2、點菜單欄下的綠色圖標(biāo)調(diào)出資源管理器 
3、點 添加自定義資源 （在問號左邊） 
4、選擇保存好的文本文檔，OK！

'調(diào)出該文件到C盤。
Dim s() As Byte '定義s為字節(jié)型變量，用于儲存二進制數(shù)據(jù)
s = LoadResData(101, "CUSTOM") '載入id號為101的自定義資源，賦給s
Open "C:\a.swf" For Binary As #1 '在C盤新建一個文件，F(xiàn)or Binary 表示以二進制文件形式創(chuàng)建
Put #1, , s '將s的內(nèi)容（即資源文件的內(nèi)容）寫入剛才新建的文件中
Close #1 '關(guān)閉這個文件，結(jié)束文件操作。