哪条语句实现return的功能,即返回到上级
在vfp中用这条语句可以返回上级,或什么都不作就返回,在vb中如何实现呢?

解决方案 »

  1.   

    如果调用子过程中想返回上级,用:
    Exit sub
      

  2.   

    GoSub...Return 语句
          在一个过程中跳到另一个子程序中执行,执行后再返回。语法GoSub line
    ...
    line
    ...Return必要的 line 参数可以是任何行标签或行号。说明可以在过程中的任何地方使用 GoSub 和 Return,但是 GoSub 和与之相应的 Return 语句必须放在同一个过程中。一个子程序中可以包含一个以上的 Return 语句,但是当碰到第一个 Return 语句时,程序就会返回到紧接在刚刚执行的 GoSub 语句之后的语句继续执行。注意 不能使用 GoSub...Return 来进入或退出 Sub 过程。提示 创建分开的过程,并使用 GoSub...Return 来调用,可以使程序更具结构化。
    GoSub...Return 语句示例
    本示例使用 GoSub 来调用子过程里的一段子程序。Return 语句则将执行返回到 GoSub 的下一个语句。Exit Sub 语句则是用来避免控制意外进入该子程序的情形发生。Sub GosubDemo()
    Dim Num
    ' 请求用户输入一个数字。
       Num = InputBox("Enter a positive number to be divided by 2.")
    ' 如果用户输入一个正整型,则使用子程序。
       If Num > 0 Then GoSub MyRoutine   
       Debug.Print Num
       Exit Sub   ' 使用 Exit 命令来避免错误发生。
    MyRoutine:
       Num = Num/2   ' 将数除以 2。
       Return   ' 将控制返回 GoSub 之后的语句。
    End Sub