[VB.NET] Errore durante la lettura dei dati da Access per "cast non valido"

[dado86ssj]

Ciao, sto facendo un programma che si connetta ad un db di access e permetta di leggere e scrivere dati.
La connessione va a buon fine, il problema è che quando vado ad inserire il valore che prelevo dal database all'interno di una label ricevo il seguente errore sull'ultima riga di codice: Cast non valido dal tipo 'Field' al tipo 'String'.

Il codice che ho utilizzato è questo:

Dim conn, rec, dbp, qsql, prova
dbp = "C:\prova.mdb"
conn = CreateObject("ADODB.Connection")
conn.Open = "driver={Microsoft Access Driver (*.mdb)};dbq=" & dbp

rec = CreateObject("ADODB.RecordSet")
qsql = "SELECT * FROM Tabella1 WHERE id = 1"
rec = conn.execute(qsql)
prova = rec("testo")
Label2.Text = prova 

[dado86ssj]

Nessuno conosce questo errore???

[vaitrafra]

si, è banale.

PRIMO: esplicita sempre i tipi delle variabili che dichiari, sennò non ci si capisce un mazzo.
SECONDO: inutile utilizzare il late binding per creare un recordset, dichiarale come

dim MyRs as new adodb.recordset

TERZO: se passi ad una varibile variant un campo del recordset in questa variabile viene memorizzato l'oggetto Field legato a quel particolare campo.

Sostituisci

prova = rec("testo")

con

prova = rec("testo").value

[dado86ssj]

Grazie per l'aiuto