E' giusto questo codice?

codice:
If rsDB.State = 1 Then
rsDB.Close
End If

rsDB.Source = "Select from Legno where id=" & txtID.Text
rsDB.ActiveConnection = cnDB
rsDB.Open
quando provo a compilare mi dice che c'è un errore di sintassi...ma non riesco a capaire dove...