sorry.. se me fue un poco.. primero debes cerrar el objeto datareader antes de cerrar la conexion.. prueba ésto:
Cita: ...
..
Finally
If Not myReader.IsClosed Then
myReader.Close()
If OleConn7.State = ConnectionState.Open Then
OleConn7.Close()
End If
End Try