帮忙见见执行时用户类型未定义

帮忙看看执行时用户类型未定义Public Function cnn() As ADODB.ConnectionSet cnn New ADODB.Connection

帮忙看看执行时用户类型未定义
Public Function cnn() As ADODB.Connection
Set cnn = New ADODB.Connection
cnn.Open "provider=msdasql;driver={sql server};server=LONG-0B00118995;uid=sa;pwd=;database=BQ数据库"

End Function

执行时用户类型未定义
[解决办法]
工程中引用ADO