Visual Basic - mostrar datos con un combo

Hola amigos tengo el siguiente codigo que estoy utilizando para mostrar en un combo lo que tiene un campo de la tabla pero pasa lo siguiente...me muestra error porque el valor del campo en algunos casos sera nulo, lo que quiero hacer es que siga mostrarndo el campo que viene ejemplo

si el registro del campo1 esta vacio
continuar mostrando el registro del campo2 que faltaba en el registro campo1 y asi en adelante cuando encuentre otro registro que esta vacio en el campos1 y creo que no me resulta con el codigo que esta a continuacion que debo cambiar???

Private Sub Form_Load()
sql = \\\"\\\"
sql = sql + \\\" select * from clientes\\\"
Set vista = db.CreateDynaset(sql)
Do Until vista.EOF

If Combo1.AddItem(vista.Fields(1)) <> 0 Then
Combo1.AddItem (vista.Fields(1))
vista.MoveNext
Else
Combo1.AddItem (vista.Fields(2))
vista.MoveNext
End If

Loop

End Sub

Agrega esta linea cuando asignas el valor al combo, cuando sea null pone un vacio o lo que quieras:

Combo1.AddItem IIf(IsNull((vista.Fields(1))), "", (vista.Fields(1)))