Visual Basic - Recordset y campos Null

Hola a todos....

Ojala puedan ayudarme con mi problema.

Estoy haciendo un programa con VB 6.0 y una base de datos SQL Server, y en algunos formularios hago consultas a tablas donde el resultado lo asigno a una etiqueta por ejemplo....Digamos

lblApellido_Materno.caption = rs!A_materno

pero cuando hago una consulta a una tabla que contiene valores Nulos me marca un error.

¿Como puedo hacer para que el recordset ponga un valor por defecto cuando se encuentre un valor nulo?

Gracias por su ayuda.

nro_fac = IIf(IsNull(rsbus(1)), "**Ninguno**", Trim(rsbus(1)))
proba con esto rsbus es el nombre del recordset

Muchas gracias, me funciono bien. :)

esta funcion te permite checa si un campo recordset viene nulo si es asi no falla te regresa una cadena vacia o puedes regresar algun valor por defaul :)

espero te sirva:

Public Function camponulo(Cadena As Variant) As String
If IsNull(Trim(Cadena)) Then
camponulo = " "
Else
camponulo = Trim(Cadena)
End If
End Function

la mandas llamar de este modo

txtfechaprox.Text = camponulo(rs!fechaproxverif)
txtnotas.Text = camponulo(rs!notas)