从VB 应用程序连接到Oracle DB而无需安装Oracle软件？

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset

Set conn = New ADODB.Connection
conn.ConnectionString = "Driver={Oracle in OraClient12Home1};DBQ=localhost:1521/orcl;UID=username;PWD=password"
conn.Open

Set rs = New ADODB.Recordset
rs.Open "SELECT * FROM table_name", conn

While Not rs.EOF
    Debug.Print rs("column_name").Value
    rs.MoveNext
Wend

rs.Close
conn.Close

Imports Oracle.DataAccess.Client

Dim conn As OracleConnection
Dim cmd As OracleCommand
Dim dr As OracleDataReader

conn = New OracleConnection("Data Source=localhost:1521/orcl;User ID=username;Password=password")
conn.Open()

cmd = New OracleCommand("SELECT * FROM table_name", conn)
dr = cmd.ExecuteReader()

While dr.Read()
    Debug.Print(dr("column_name").ToString())
End While

dr.Close()
conn.Close()