执行代码为字符串vb.net

Question

这可以做到吗？

Public Function MyFunc() as Integer
        dim I as integer
        Execute("I = 50")
        Return I
End Function

我的意思是我可以在函数中执行这样的代码吗？

edit1：我在这里问了另一个问题：功能中的检查点vb.net

我有一个标签名称的队列，当我脱离时，我想运行这样的东西：

Dim Queue as new Queue(of string)
Queue.Enqueue("Checkpoint1")
 Queue.Enqueue("Checkpoint2")
Dim i =Queue.dequeue()
GoTo I

，但我无法动态设置此标签我想知道是否有任何方法可以实现这样的STH？

Answer 1

基于您的链接问题，这是您需要的东西：

Dim choices = New Dictionary(Of String, Action) From
{
    { "Apple", Sub () Console.WriteLine("I Love Apples") },
    { "Banana", Sub () Console.WriteLine("I Go Ape Over Bananas") }
}
choices("Banana").Invoke()

这将"I Go Ape Over Bananas"输出到控制台。

请参阅https://stackoverflow.com/a/46440962/259769有关您需要的更具体的实现。