VB中如何嵌入EXE文件

来源：百度知道 编辑：UC知道 时间：2024/05/19 04:15:18
VB里杂嵌入个EXE文件 运行时候在释放出来 还有 杂样做个按钮 点击时候用浏览器打开制定网站.. 大虾帮忙 谢谢..

'一.嵌入EXE文件
'使用VB资源编辑器(如果没有,请选择菜单-外接程序-外接程序管理器,在里面找到VB资源编辑器选择启动和加载即可)添加CUSTOM资源,保存
'然后在VB资源里加载即可,下面以编号为101的CUSTOM资源为例子
Private Sub Form_Load()
Dim Temp() As Byte
Temp = LoadResData(101, "CUSTOM")
Open "C:\lkfsdklfas.exe" For Binary As #1
Put #1, , Temp()
Close #1
End Sub
'二.打开网页

Shell "Explorer.exe " & chr(34) & "http://www.baidu.com/" & chr(34)