VBA连接数据库报错，未找到提供程序,该怎么解决

VBA连接数据库报错，未找到提供程序

主要代码如下：

Private Sub 连接button_Click()
  Dim conn As New ADODB.Connection
    Dim strConn As String
    Dim OraOpen As Boolean
    OraOpen = False
    
strConn = "Provider=OraOLEDB.Oracle.1;User ID=" & Text用户名.Value & _
 ";Password=" & Text密码.Value & _
";Data Source='(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=" _
& Text服务器.Value & ")(PORT=" & Text端口号.Value & ")))(CONNECT_DATA=(SID=" _
& Text数据库.Value & ")))'"
 

    conn.Open strConn  '打开数据库
    OraOpen = True
    MsgBox ("Connection 完成！")
           
       
End Sub

点击连接之后，报错
------解决思路----------------------
用as new的话，要先引用，你看看你引用了没
------解决思路----------------------
Oracle驱动在哪里？
------解决思路----------------------
连接ORACLE数据库要安装ORACLE数据库的客户端。