VB中的函数