过程示例:
Sub test()
Debug.Print "Hello"
End Sub
'//'
函数示例: 函数体最后通常都带有一条返回值语句,把函数执行的结果赋值给"函数名",就可以在调用这个函数的地方通过等于号=得到这个函数的执行结果。这个返回结果的数据类型应该与函数名后面As的数据类型一致,否则可能会出错。
Function my_sum(n1 as Integer, n2 as Integer) As Integer
Dim s As Integer
s = n1 + n2
my_sum = s
End Function
'///'
函数可被过程(即宏)调用: 函数的调用通常会在调用时把其赋值给一个变量,以获取函数返回值。
Sub test()
Dim s As Integer
s = my_sum(5, 5)
Debug.Print s
End Sub
Function my_sum(n1 As Integer, n2 As Integer) As Integer
Dim s As Integer
s