Dim conn_ora As System.Data.OracleClient.OracleConnection
Dim builder_ora As New System.Data.OracleClient.OracleConnectionStringBuilder

'--------------------------------------------------
'ORACLE
'--------------------------------------------------
'アイテムで設定
builder_ora("Password") = "etc"
builder_ora("User") = "etc"
builder_ora("Server") = "omsdb"

'プロパティで設定
'builder_ora.Password = "etc"
'builder_ora.UserID = "etc"
'builder_ora.DataSource = "omsdb"

Try
    conn_ora = New System.Data.OracleClient.OracleConnection(builder_ora.ConnectionString)
    conn_ora.Open()
Catch ex As Exception
    MessageBox.Show(ex.Message + builder_ora.ConnectionString)
End Try
   .
   .
   .