你說的有點像外*掛中間的腳本,可以讓使用者自己編寫一段代碼,程序可以執行。
但是編譯成exe就不現實了,只要能執行腳本不就行了嗎?
VB語言可以實現這一功能,VB利用Microsoft Script Control對象可以動態執行(即無需事先編譯成EXE)VBS指令,代碼如下:
窗體放一個多行文本框和一個按鈕。
PrivateSubCommand1_Click()
DimScriptControlAsObject,Psw$
SetScriptControl=CreateObject("MSScriptControl.ScriptControl")
ScriptControl.Language="VBScript"
ScriptControl.Timeout=-1
ScriptControl.AddCodeText1.Text
Psw=ScriptControl.Run("encodePwd")
MsgBoxPsw
EndSub
PrivateSubForm_Load()
Text1.Text="FunctionencodePwd()"&vbCrLf&_
"encodePwd=""這是返回字元串"""&vbCrLf&_
"EndFunction"
EndSub