quindi

Data1.RecordSource = "select * from magazzino where titolo like ""& _
tit1 & """order by titolo"

mi dice prevista FINE ISTRUZIONE