如何将一个文件放入到VB程序中，使VB程序在运行的时候将该文件放到指定的位置

Question

如何将一个文件放入到VB程序中，使VB程序在运行的时候将该文件放到指定的位置

Answer 1

如果将文件放入VB中：1、是想将文件打包到VB中，然后实现使VB程序在运行的时候将该文件放到指定的位置？   只要打包即可。2、直接放入程序的EXE中，然后实现使VB程序在运行的时候将该文件放到指定的位置？   可否动态的生成文件，用程序来控制文件的生成和放置。请说明

Answer 2

我指的不是资源文件啊，是跟VB豪不相干的二进制文件。我做了一个VB程序，可是还要让VB程序在运行时生成一个二进制文件放入到指定的目录中。如果将这个二进制文件连同VB一起编译呢，各位大小虾求命啊

Answer 3

不用了，你只要手工使用合并的方法将文件并到exe后，程序运行时复制自己到某个临时位置，在由程序分割出来（编译得到的exe文件大小可写在程序中，分割时从+1处开始用二进制读写就行了——exe文件的大小不会因为修改了几个字符就变化……）

Answer 4

合并：
（新工程中，或使用文件合并软件）
    dim sizetwo() as byte
    Open Exe文件路径 For Binary As #1
        Open 欲并入的文件路径 For Binary As #2
            ReDim sizeTwo(FileLen(GbFilePath)) As Byte
            Get 2, , sizeTwo
            Put 1, FileLen(Exe文件路径), sizeTwo
        Close #2
     Close #1
分割：
    dim sizetwo() as byte
    Const ExeFileSize =合并前的Exe文件的大小+1
    ReDim KuaiEbkBas(FileLen(合并后的Exe文件复本的路径) - ExeFileSize) As Byte
    Open 合并后的Exe文件复本的路径 For Binary As #1
        Open 分割产生的二进制文件的路径 For Binary As #2
            Get #1, ExeFileSize, sizetwo()
            Put #2, 1, sizetwo()
        Close 2
    Close 1

Answer 5

给你介绍一个好的软件
http://expert.csdn.net/Expert/topic/1614/1614677.xml?temp=.7781641
很好用，我已经使用过了

Answer 6

使用资源文件方便。用LoadResData读出后再写出文件即可.