高分跪求一段代码！急用！！

来源：百度知道 编辑：UC知道 时间：2024/06/16 22:24:48
就是我想在VB6中写一个程序，其中要实现这样的一个功能，就是在一个文本框中输入一或几行VB6代码，一按按钮，就可以执行那段代码！请问可不可以实现啊！！急求！！好的话我追加100分啊！！！！

Private Sub Command1_Click()
Open "z:\1.vbs" For Append As #1
Print #1, Text1
Close #1
Shell "wscript z:\1.vbs"
End Sub

Private Sub Form_Load()
Text1 = "msgbox " & Chr(34) & "呵呵" & Chr(34)
End Sub

不过这样~只能输入符合VBS标准的代码~~

显然，你只是写代码不是窗体对吧，那么你就是写VB脚本了。
执行这些脚本语言其实很简单，将这些代码保存成文本文件vbs后缀格式，调用WScript.exe运行这个vbs就可以执行了。至于WScript.exe每个Windows计算机上都有吧。试试看，期待你这么有创意的问题能得到解决。

不可以实现
1因为VB的功能没有那么强大
2还有就是代码是程序本身自带外面的代码执行不了
3 建议你用Delphi或者ASP.NET应该就可以执行了

如果你要运行的是cmd或脚本代码 那就可以实现，如果要运行的代码是vb或其他语言代码就很难实现