Visual Basic - Command dentro de una función

Buenas, tengo una preguna sobre un Command dentro de una función.

La función en concreto es la siguiente:

Function Comando( x As String )

Dim ComandLoad As New ADODB.Command
With ComandLoad
.CommandType = adCmdText
.CommandText = x
.ActiveConnection = Conexion()
\'Conexion es una función que devuelve un objeto conexión
End With
Comando = ComandLoad

End Function

Pues cuando la llamo desde un formulario de la siguiente forma:

Dim ResultadoLoad As New ADODB.Recordset
ResultadoLoad.Open Comando(query)

Me da un error en la línea del ResultadoLoad.Open Comando(query) y me indica \"Argumentos incorrectos, fuera del intérvalo o en conflicto con otros\". ¿Alguien sabe decirme si estoy realizando mal la llamada a la función Comando o si hay algún error en ella?

Muchas Gracias

No estas cumpliendo con la sintaxis del Recordset , por lo tanto ese es el error.