excel vba, 函数返回值

Private Function ccc(a As Integer) As Integerccc=a*a+2End Function