是否可以使用切换到另一个功能的功能,当该步骤完成后再次返回第一个功能......?此刻我只能切换到另一个子但不返回并继续我离开的地方 例如:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
msgbox("Hello step 1")
Call SECONDSTEP()
msgbox("Hello step3")
end sub
答案 0 :(得分:3)
好吧,如果你做这样的事情:
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
如果将运行第一个消息框(Hello Step 1),然后运行第二个函数 它将x和y相乘然后返回第一个方法并给你第二个消息框(答案是42)。
答案 1 :(得分:3)
您的执行将始终返回到调用函数。在这个例子中,三个消息框按顺序显示step1,step2,step3。但是如果子函数包含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