Visual Basic - MSGBOX EN CONSULTA SQL

TENGO HECHA UN BUSQUEDA EN UN TEXT QUE A MEDIDA QUE VOY INGRESANDO UN PALABRA ME VA ACUTALIZANDO LA BASE DE DATOS Y AL MISMO TIEMPO ME PONE EL RESULTADO EN UN TEXT. EL PROBLEMA ES QUE SI YO INGRESO UNA PALABRA QUE NO ESTA EN LA BASE DE DATOS, ME SALTA UN ERROR PORQUE LO QUE SE LE PASA AL TEXT ES UN VALOR NULO.
SI ALGUIEN ME PUEDE AYUDAR SE LO AGRADECERIA. EL CODIG. ES:

Data1.RecordSource = "select * from inmo where barrio like '*" & Text2(0).Text & "*'"
Data1.Refresh
For i = 0 To 16
Text1(i).Text = Data1.Recordset.Fields(i).Value
Next i
End If

Mejor utiliza el Filter del objeto DataControl, y solamente si encontro coincidencias que las muestre.

Puedes controlar el null...

Text1(i).Text = iif( isnull ( Data1.Recordset.Fields(i).Value ) , "", Data1.Recordset.Fields(i).Value )