Question

这可能吗？

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

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

EDIT1：我在这里问了另一个问题： Checkpoints in functions VB.NET

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

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

但我无法动态设置此标签而且我想知道有没有办法实现这样或不？

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。

执行代码为字符串vb.net

1 个答案: