一句代码得到SQL SERVER时间的函数

Function getServerTime() As Date
     getServerTime = CDate(CurrentProject.Connection.Execute("SELECT GETDATE()")(0).＆#118alue)
End Function