主题：[求助]动态函数问题

Functions.remove("xtsz")

dim code as string = ""

for each k as string in _XTGJXX.keys

    code = code & k & " = '" & _ZTGJXX(k) & "'" & vbcrlf

    code = code & "saveconfigvalue('sz_" & k & "','" & _XTGJXX(k) & "')" & vbcrlf

next

functions.add("xtsz",code)

functions.complie()

function.execute("xtsz")

Functions.remove("xtsz")

dim code as string = ""

for each k as string in _XTGJXX.keys

    code = code & k & " = """ & _ZTGJXX(k) & """" & vbcrlf

    code = code & "saveconfigvalue(" & """sz_" & k & """,""" & _XTGJXX(k) & """)" & vbcrlf

next

functions.add("xtsz",code)

functions.complie()

function.execute("xtsz")