Filtro de datos

Tengo el siguiente código:

If text = '' or isNull(text) Then
dw_1.SetFilter("")
dw_1.Filter()
Else
dw_1.SetFilter("UPPER(nombre) like'%" + This.Text + "%'")
dw_1.Filter()
End If

Filtra los datos del datawindow bien siempre y cuando haya una letra que coincida en los registros caso contrario arroja error; mi pregunta es como puedo controlar para evitar ese error; es decir si no hay ningún registro que tenga al menos una letra que busco que no muestre nada el datawindows.

Desde ya muchas gracias por la ayuda