作业左侧函数调用必须返回变体或对象错误

Question

我一直在Excel VBA中开发一段时间，现在没有错误。然而，今天，Adter只评论了Sub之外的东西，我的所有功能现在都会抛出一个Function call on left-hand side of assignment must return variant or object error错误。请参阅以下示例：

Public Function fGetEmployees() As Variant()

Dim oDB As ADODB.Connection
Dim oCM As ADODB.Command
Dim oRS As ADODB.Recordset
Dim strSQL As String

On Error GoTo Err:

strSQL = "SELECT StaffId, FirstName, LastName " & _
        "FROM ptqEmployees"

Set oDB = New ADODB.Connection
oDB.Open gcConn
Set oCM = New ADODB.Command

With oCM
    .ActiveConnection = oDB
    .CommandText = strSQL
    .CommandType = adCmdText
    Set oRS = .Execute
End With

fGetEmployees = oRS.GetRows()

oRS.Close
Set oRS = Nothing
oDB.Close
Set oRS = Nothing

Exit Function

Err:
    Call fLogDBError(Err.Number, Err.Description, 4)

End Function

.

错误在线抛出： fGetEmployees = oRS.GetRows()

如上所述，这一直在运作，现在有时没有问题。没有选择调试。

任何人都可以帮助问题是什么？

Answer 1

非常奇怪，但我导出了模块然后导入它，现在正常工作。