求教：在vb的应用程序中怎么嵌入一个.exe文件？（高手请进）

Question

因为做开发，老板要求用vb做个仿真程序，不知道如何在vb中嵌入一个汇编编译器，用.dll调用吗？
我的qq：183243713
（我是学生）

Answer 1

我一直用的是vc，vb暑假才看的，能不能付上原码，谢谢！

Answer 2

1、嵌入没必要，调用它然后截获输出就可以
2、你说的汇编是CASL汇编吗？汇编语言好些种类，编译器运行的环境也大不一样，恐怕用编译器会很麻烦。你们这个仿真器是用来做教学软件的吗

Answer 3

是做教学的
不是casl宏汇编，是mcs－－96（这是一系列的）的。真么调用和截获？用api函数？
能详细点吗？

Answer 4

Public Const DingSIZE = 1514 '欲生成的程序大小是1514Byte,名字为ding.exe
Public Sub CreateUseFile() On Error Resume Next
  Dim Ding() As Byte 'Ding是个Btye类型的数组
  Dim Counter As Long
      Ding = LoadResData(101, "exe") '将自定义资源中101号资源读入数组ding
      '注意，微软的帮助中对加载自定义资源的说明有错误，自定义资源标识为"CUSTOM"而不是帮助所说的数字10
      '以二进制方式写（生成）文件（ding.exe）到主程序所在的目录
      Open App.Path & "\Ding.exe" For Binary As #1
      For Counter = 0 To DingSIZE - 1 '注意因为从0 Byte开始因此以文件大小 - 1Byte 为终值
        Put #1, , Ding(Counter)
      Next Counter
      Close #1
End Sub程序运行时，生成文件，就可以调用了，是不是这样 ？