是否可以让一个函数切换到另一个函数,当该步骤完成时,再次返回到第一个函数。。。?现在我只能换到另一艘潜艇,但不能返回并继续我离开的地方示例:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
msgbox("Hello step 1")
Call SECONDSTEP()
msgbox("Hello step3")
end sub
您的执行将始终返回到调用函数。在该示例中,三个消息框按顺序显示步骤1、步骤2、步骤3。但若子函数包含close()
,则执行将不会返回到调用函数。
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
MsgBox("step 1")
Call SECONDSTEP()
MsgBox("step3")
End Sub
Private Sub SECONDSTEP()
MsgBox("step2")
End Sub
好吧,如果你做这样的事情:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
msgbox("Hello step 1")
Dim a As Integer
a = GiveMeSomeAnswers(21,2)
msgbox("The answer is"& a)
End Sub
Private Function GiveMeSomeAnswers(x As Integer, y As Integer) As Integer
Return x*y
End Sub
If将运行第一个消息框(Hello步骤1),然后运行第二个函数它将x和y相乘,然后返回第一个方法,并给你第二个消息框,上面写着(答案是42)。