→→→テーブルが存在しない時のエラーに対処

Dim oCom As OleDbCommand
Dim oRdr As OleDbDataReader
Dim oCn As OleDbConnection = New OleDbConnection
oCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\**;Persist Security Info = False"
oCn.Open()
oCom  = New OleDbCommand("SELECT * FROM 存在しないテーブル", oCn)
Try
     oRdr = oCom.ExcuteReader()
     MessageBox.Show("読み込みました","処理結果")
     oRdr.Close()
Catch ex As Exception
     MessageBox.Show( ex.Message,"エラー")
End Try
oCn.Close()