Visual Basic - Traer valores Nulos en una base de datos

Tenemos el siguiente programa para traer apartir de una consulta SQL algunos datos y arrojarlos a una lista:

SQL = "select * from clientes where País = '" & Combo1(0).Text & "' and Ciudad = '" & Combo1(1).Text & "' and IdCliente like '" & Text2.Text & "*' or Región = '" & Text1.Text & "'"

Set RgCliente = DB.OpenRecordset(SQL)

With RgCliente
Do While Not .EOF
List1.AddItem !IdCliente & " " & !NombreCompañía
.MoveNext
Loop
End With

El problema es que el campo Region si uno no le coloca nada en el textBox no me trae nada

Como el campo de region es opcional no puede ser parte de la consulta de una manera fija, tienes que trabajar con una variable, de esta forma:

Dim Wregion as string

if Len(Trim(Text1.Text))<> 0 then
Wregion= " or Región ='" & Text1.Text & "'"
else
wregion=empty
endif

La consulta quedaria asi:

SQL = "select * from clientes where País = '" & Combo1(0).Text & "' and Ciudad = '" & Combo1(1).Text & "' and IdCliente like '" & Text2.Text & "*'" & Wregion

como veras si Text1.text esta en vacio la cadena de consula no se ve afectada ya que contiene un valor Empty o vacio.

Suerte