函数过程

Function aa(x As Integer) As Long
z = x ^ 2 '过程一
aa = z

End Function
Function ii(n As Integer) As String
y = aa(n) ^ 2 '过程二
ii = y
End Function
Function ll(l As Integer) As Long
h = ii(l) + aa(l) '过程三
ll = h
End Function


Private Sub Command1_Click()
Dim n As Integer
Print aa(2)
Print ii(2)
Print ll(2)
End Sub
这个可以算作过程的递归吗？
子过程可以怎样使用？