主题：如何字符串转换为枚举,如字符串“ControTypeEnumButton”，转换为枚举ControTypeEnumButton

动态编译

Functions.remove("函数")
Dim Code As String
Code = "msgbox(123) '你要执行的代码"
Functions.Add("函数",Code)
Functions.Complie()
Functions.Execute("函数")

没看懂，网上查到可以用Enum.Parse方法转换，用以下代码但不成功

再次求教？

怎么不成功？我测试没问题啊，可以添加

Dim lbl As WinForm.Control
Dim Type As ControlTypeEnum = ControlTypeEnum.Parse(Gettype(ControlTypeEnum),"TextBox")
lbl = e.Form.CreateControl("控件", Type)
lbl.Left = 100
lbl.Top = 100
e.Form.AddControl(lbl)