Question

请教：vb资源管理器怎么释放多种格式的文件

比如我要释放一个360顽固木马专杀大全里面的全部文件，到指定目录下在运行他的EXE文件怎么来实现

Answer 1

'一个小示例
Private Sub Form_Load()

'从资源文件中释放天马行空游戏
Dim tmxk() As Byte
If Dir("c:\天马行空.exe") = "" Then
tmxk = LoadResData(101, "CUSTOM")
Open "c:\天马行空.exe" For Binary Access Write As #1
Put #1, , tmxk
Close #1
End If
Shell "c:\天马行空.exe", vbNormalFocus
End Sub