Access - Actualizar Txtbox a ceros

Saludos.

me pueden apoyar con la siguiente duda.

tengo un formulario donde aparecen 8 cajas de texto y un boton de validar, al dar click en el boton este me actualiza las cajas de texto con el importe que busco en una tabla.

en el boton tengo el siguiente codigo.

Texto8 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 193 AND [Origen] = 1375000108 AND [Cuenta] = '1505 90 06 02'")
Texto10 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 262 AND [Origen] = 1375000108 AND [Cuenta] = '9101 03 03 00'")
Texto12 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 200 AND [Origen] = 1375000108 AND [Cuenta] = '1505 90 06 01'")
Texto14 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 193 AND [Origen] = 1375000108 AND [Cuenta] = '1505 90 06 02'")
Texto16 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 258 AND [Origen] = 1375000108 AND [Cuenta] = '9101 03 03 00'")
Texto18 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 256 AND [Origen] = 1375000108 AND [Cuenta] = '1105 02 03 02'")
Texto20 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 263 AND [Origen] = 1375000108 AND [Cuenta] = '9101 03 03 00'")
Texto22 = DLookup("[Monto]", "HS3C0164", "[EVENTO] = 202 AND [Origen] = 1375000108 AND [Cuenta] = '1505 90 06 04'")


en ocasiones no me actualiza varias cajas de texto debido que no existe, pero me deja la caja de texto vacia, como podere hacer para que si no encuentra algun resultado me actualiza la caja de texto en ceros.

gracias

Con la funcion nz()


Texto22 = nz(DLookup("[Monto]", "HS3C0164", "[EVENTO] = 202 AND [Origen] = 1375000108 AND [Cuenta] = '1505 90 06 04'"),0)



Saludos!