Question

请问vb6能否实现把文字代码写在txt上再读取执行

我不知大家能否理解，比如我把command1_click部分的代码写在程序根目录下的1.txt里面，然后进行command1_click的时候读取1.txt里面的内容，并执行里面的内容，请问这个可以实现吗？如果能实现，请给出思路，谢谢。

Answer 1

可以，通过获得文件的句柄来操作读写文件内容。
执行的话，只能是编译过后的exe，或者可执行的bat格式，dll文件。。。。

Answer 2

private sub form_load()
dim str as string
open app.path & "\QQ.txt" for input as #1
do while not eof(1)
line input#1,str
list1.additem str
loop
close
end sub
private sub list1_click()
text1=right(list1.text,len(list1.text)-instr(list1.text,"=")
end sub
另外,站长团上有产品团购,便宜有保证