Looks like you have not declared the reader.
Insert the following at the top of the method
Dim dbReader as DbDataReader OleDbDataReader= Nothing
I have changed the Object Type, as only just noticied you where using OleDbCommand which returns a different type from the ExecuteReader function.