Question

我正在努力将一些VB6代码转换为VB.Net，但目前无法实际运行VB6代码以查看其功能。

我有它（VB6，即）这样的结构： -

Sub MySub

    ' Do works
    If somecondition Then GoSub 10000
    ' More works
    Return

10000
    ' More works still
    Exit Sub

End Sub

问题是，Exit Sub是从GoSub返回，还是从MySub退出？

Answer 1

代码是错误的，如示例中所写，并且将失败＆＃34;返回没有Gosub。＆＃34;

考虑：

Option Explicit

Private Count As Integer

Private Sub TestIt()
    GoSub Something
    MsgBox "Here"
    Exit Sub

Something:
    If Count > 0 Then Exit Sub
    Count = Count + 1
    Return
End Sub

Private Sub Main()
    TestIt
    TestIt
    MsgBox Count
End Sub

这将弹出一个＆＃34; Here＆＃34;然后是＆＃34; 1＆＃34;消息框。

Exit Sub退出子程序，它根本不是Return的同义词。

GoSub后退出Sub - 退出Sub或从Gosub返回

1 个答案: