子程序-Sub

Sub 子程序名([自定义参数1, 自定义参数2, ...])
执行语句
End Sub

示例1：

Call 子程序()

Sub 子程序()
    TracePrint "我是子程序,被你调用了1"
    TracePrint "我是子程序,被你调用了2"
    TracePrint "我是子程序,被你调用了3"
End Sub

示例2：

Dim 变量1,变量2
变量1="我是字符串信息"
变量2=123
Call 子程序(变量1,变量2,"第三个参数",456)
EndScript
//定义一个过程,可以在脚本中调用这个过程
Sub 子程序(参数1,参数2,参数3,参数4)
    TracePrint "我是子程序,被你调用了"
    TracePrint "参数1=" & 参数1
    TracePrint "参数2=" & 参数2
    TracePrint "参数3=" & 参数3
    TracePrint "参数4=" & 参数4
End Sub

函数-Function

Function 函数名([自定义参数1, 自定义参数2, ...])
执行语句
[函数名=返回值]
End Function

示例1：

Call f1()

Function f1()
    TracePrint "我是自定义函数,被你调用了"
End Function

示例2：

Function add(a, b, c, d)
    TracePrint "我是写在函数中被调用的！"
    add = a + b + c + d
End Function

TracePrint "函数求和结果为： " ,add(1, 2, 3, 4)

注：函数可以代替所有子程序，而子程序无法代替所有函数，因为函数有返回值，子程序没有返回值
推荐全部使用函数，因为行者在刚刚查询文档之前也不理解为什么搞个子程序出来，后来认为，子程序可以作为初学者理解函数的一个过程，理解之后，就该舍弃了