VB文件包容

来源：百度知道 编辑：UC知道 时间：2024/05/23 12:53:07
把一个文件包容(插入)程序,当程序需要用到时,再把它释放到指定位置
OK?????
给代码

可以的。 做个资源文件 ，然后在程序需要的时候释放就行了。

资源文件
'SaveFileFromResource 101, "CUSTOM", SysPath & "abc.sys"
Public Function SaveFileFromResource(vntResourceID As Variant, sType As String, sFileName As String) As Boolean

Dim bytImage() As Byte
Dim iFileNum As Integer
On Error GoTo SaveFileFromRes_Err
SaveFileFromResource = True

bytImage = LoadResData(vntResourceID, sType)

iFileNum = FreeFile

Open sFileName For Binary As iFileNum
Put #iFileNum, , bytImage
Close iFileNum
Exit Function
SaveFileFromRes_Err:
SaveFileFromResource = False: Err.Clear
End Function

这个看你要插如什么东西，如果是批处理那么可以直接写