End （块）
表示复合语句块的结束。
End { Sub | Function | If | Select | Type | Enum | Scope | With | Namespace | Extern | Constructor | Destructor | Operator | Property }
用于指示最近的代码块的结束。
命令中必须包含该块的类型：Sub，Function，If，Select，Type，Enum，Scope，With，NamespaceExtern，Constructor，Destructor，Operator或Property.
结束Function，Function，If，Select，Scope，Constructor，Destructor，Operator或Property块也会关闭该块内定义的变量范围。当范围关闭时，范围内定义的变量被破坏，根据需要调用它们的析构函数。
要结束程序，请参阅End （语句）.
语法
End { Sub | Function | If | Select | Type | Enum | Scope | With | Namespace | Extern | Constructor | Destructor | Operator | Property }
说明
用于指示最近的代码块的结束。
命令中必须包含该块的类型：Sub，Function，If，Select，Type，Enum，Scope，With，NamespaceExtern，Constructor，Destructor，Operator或Property.
结束Function，Function，If，Select，Scope，Constructor，Destructor，Operator或Property块也会关闭该块内定义的变量范围。当范围关闭时，范围内定义的变量被破坏，根据需要调用它们的析构函数。
要结束程序，请参阅End （语句）.
例子
Declare Sub checkvalue( n As Integer )
Dim variable As Integer
Input "给我一个数字：", variable
If variable = 1 Then
Print "你给了我一个1"
Else
Print "你给了我一个大号！"
End If
checkvalue(variable)
Sub checkvalue( n As Integer )
Print "价值是：" & n
End Sub
Dim variable As Integer
Input "给我一个数字：", variable
If variable = 1 Then
Print "你给了我一个1"
Else
Print "你给了我一个大号！"
End If
checkvalue(variable)
Sub checkvalue( n As Integer )
Print "价值是：" & n
End Sub
与QB差别
- 没有
参考