Visual Basic中如何将字符串转换为语句标签以跳转指定测试步骤？

首先明确：VB.NET的GoTo语句不支持使用字符串变量作为目标标签。因为GoTo的目标标签是编译期必须确定的常量，编译器会在编译阶段校验标签是否存在，所以直接用GoTo TestStep（TestStep是变量）会提示标签未定义，这是语言本身的限制。

针对你要直接执行指定测试步骤的需求，推荐两种更合理的替代方案：

方案1：使用Select Case匹配步骤 #

先把每个独立步骤封装成单独的Sub方法，通过命令行传入的步骤名称匹配执行：

' 封装每个步骤为独立方法
Private Sub Step_1()
    ' 这里写Step_1的执行代码
    Console.WriteLine("执行Step_1")
End Sub

Private Sub Step_3()
    ' 这里写Step_3的执行代码
    Console.WriteLine("执行Step_3")
End Sub

' 处理命令行参数并执行指定步骤
Sub Main()
    ' 假设已从命令行提取到步骤名称，这里模拟获取"Step_3"（注意去除冒号）
    Dim testStep As String = "Step_3"

    Select Case testStep
        Case "Step_1"
            Step_1()
        Case "Step_3"
            Step_3()
        ' 依次添加其他步骤的匹配项
        Case Else
            Console.WriteLine("无效的步骤名称")
    End Select
End Sub

方案2：使用字典映射字符串到步骤方法 #

如果步骤数量很多，用字典映射字符串到方法委托的方式扩展性更好，不用维护冗长的Select Case：

' 定义步骤方法的委托类型
Private Delegate Sub StepDelegate()

' 初始化步骤映射字典
Private stepMap As New Dictionary(Of String, StepDelegate) From {
    {"Step_1", AddressOf Step_1},
    {"Step_3", AddressOf Step_3}
    ' 继续添加其他步骤的映射关系
}

' 封装步骤方法
Private Sub Step_1()
    Console.WriteLine("执行Step_1")
End Sub

Private Sub Step_3()
    Console.WriteLine("执行Step_3")
End Sub

' 处理命令行参数并执行
Sub Main()
    Dim testStep As String = "Step_3:" ' 从命令行获取的原始字符串
    ' 去除字符串末尾的冒号，匹配字典中的键
    Dim stepKey As String = testStep.TrimEnd(":"c)

    If stepMap.ContainsKey(stepKey) Then
        stepMap(stepKey).Invoke() ' 执行对应步骤
    Else
        Console.WriteLine($"未找到步骤：{stepKey}")
    End If
End Sub

额外建议 #

把每个步骤封装成独立方法是比使用标签和GoTo更优的实践，不仅能满足你直接测试单一步骤的需求，还能让代码结构更清晰、更易维护，避免GoTo带来的代码跳转混乱问题。

内容的提问来源于stack exchange，提问作者bonesandwich