在起始声明语句(Sub
或 Function
)和结束声明语句(End Sub
或 End Function
)之间将过程括起来。 所有过程的代码都位于这些语句之间。
过程不能包含另一个过程,因此其起始语句和结束语句必须位于任何其他过程之外。
如果代码在不同位置执行相同的任务,则可以将任务编写为过程一次,然后从代码中的不同位置调用它。
创建一个不返回值的函数或过程
在任何其他过程外,使用
Sub
语句,后接End Sub
语句。在
Sub
语句中,关键字Sub
后应跟随过程的名称,然后在括号中列出参数列表。将过程的代码语句放在
Sub
和End Sub
之间。
创建一个返回值的函数
在任何其他过程外,使用
Function
语句,后接End Function
语句。在
Function
语句中,紧跟Function
关键字之后使用过程的名称,然后在括号中给出参数列表,接着添加As
子句来指定返回值的数据类型。将过程的代码语句放在
Function
和End Function
之间。使用
Return
语句将数值返回给调用代码。
将新过程与旧的重复代码块连接起来
请确保在旧的代码可以访问的地方定义新过程。
在旧的重复代码块中,将执行重复任务的语句替换为调用
Sub
或Function
过程的单个语句。如果过程是
Function
返回值的过程,请确保调用语句使用返回的值执行作,例如将其存储在变量中,否则该值将丢失。
示例:
以下 Function
过程计算直角三角形的最长一侧或斜边,给定其他两边的值:
Function Hypotenuse(side1 As Double, side2 As Double) As Double
Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
End Function