Hola, estoy intentando hacer una select a Access 2007 en Visual Basic con Visual Studio 2013, peor no soy capaz de hacerlo.

La cadena de conexión está bien, pues me permite insertar los datos, pero cuando intento sacarlos de la base de datos y mostrarlos en cajas de texto, no sé por qué, no me deja hacerlo.

Los he probado de muchas maneras y nada. Aquí dejo el código a ver si alguien me puede orientar 

Try
 
    'Se abre la conexión
    Dim Conexion As OleDbConnection = New OleDbConnection(StrConexion)
    Dim str As String
 
    str = "SELET Descripcion FROM Productos WHERE(Id = 3)"
    txtTotalProductos.Text = str.ToString
 
    'Se cierra la conexión
    Conexion.Close()
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
 

Esta era  una consulta de ejemplo para mostrar los datos en una caja de texto, que yo creo que debería funcionar pues los datos de BD y demás está bien.