如何在代码中随时轻微更改几个.exe？

Question

问题是我需要制作8000个文件，相同的VB6项目，但是只有一个变量需要在每个文件中更改它的编号。我会花很多时间手动构建文件。

我尝试使用.txt作为变量源，所以我创建了另一个项目，它改变.txt数字，并在命令行中用“vb6.exe / make”编译原始项目，而在原始项目中项目我让它读取.txt来获取数字。但是...它需要整个读取文件代码，并且在执行时.exe尝试查找.txt而不是显示构建时所获取的值。 DAH！

是否有机会从VB6 textbox.text代码构建.exe文件？

例如：

Textbox1.Text =“MsgBox（”hello“）”

然后从Textbox1.Text构建一个.exe，这样就会打开一个msgbox说“你好”

我是通过编辑.frm文件完成的（好吧，你不能编辑，但你可以创建一个新文件），这里有一些代码，如果你试图批量编译你会觉得有用具有类似程序变化的代码：

'编辑.frm文件

Open "C:\Form1.frm" For Output As #1
Print #1, Label1.Caption & vbCrLf & Label2.Caption & Text1.Text & Label3.Caption 'Here goes the entire .frm code, the changes are in Text1.Text
Close #1

'Shell编译器

Shell (VB6path & " /make " & ProjectPath & " /outdir " & EXEPath)

'复制具有所需名称的文件

FileCopy ("C:\Project1.exe"), ("C:\" & Text1.Text & ".exe") 'Text1.Text contains the rotating name.

'删除Project1.exe

If Dir("C:\Project1.exe") <> "" Then
Kill "C:\Project1.exe"
End If

您可以创建一个数组或将变量数据从另一个带有列表的文件中插入到.frm文件中，或者其他任何内容。