Почему моя функция несовместима с CLS?

I я получаю следующее предупреждающее сообщение ...

Тип возврата функции 'ConnectionNew' несовместим с CLS.

... для этой функции:

Public Function ConnectionNew(ByVal DataBaseName As String) As MySqlConnection
      Dim connection As MySqlConnection = Nothing
      connection = getConnection(DataBaseName())
      Return connection
End Function

Что означает это сообщение и как его исправить?