比如用到了一个swf文件，如何在生成可执行文件时包含它，注意：不是制作安装程序!

我用的是vb6.0 可以把你的代码解释下吗？我是新手！

制成资源文件： 

1、（菜单栏）外接程序——外接程序管理器——加载VB 6 资源编辑器 
2、点菜单栏下的绿色图标调出资源管理器 
3、点 添加自定义资源 （在问号左边） 
4、选择保存好的文本文档，OK！

'调出该文件到C盘。
Dim s() As Byte '定义s为字节型变量，用于储存二进制数据
s = LoadResData(101, "CUSTOM") '载入id号为101的自定义资源，赋给s
Open "C:\a.swf" For Binary As #1 '在C盘新建一个文件，For Binary 表示以二进制文件形式创建
Put #1, , s '将s的内容（即资源文件的内容）写入刚才新建的文件中
Close #1 '关闭这个文件，结束文件操作。