[Resolvido]tratamento de erro

galera to com um problema tenho uma pesquisa de uma entrada de condomínio q assim que digito a placa mostra a foto do carro e do morador mas tem um porem ta dando erro se não tem a placa cadastrada queria que me ajudassem a resolver isso
so tem um observação se eu usar o código em uma tabela da certo mas criei uma consulta com o nome de tbplaca envolvendo varias tabelas ai já não da mais certo quando não e encontrado a placa alguma solucao


Private Sub PESQUISA_Change()
Dim C As String, x As String
x = Me.PESQUISA.Text
C = " where IDBLOCOAP like '*" & x & "*' or PLACA like '*" & x & "*' or MORADOR like '*" & x & "*'"
Me.FrmPLACAGRID.Form.RecordSource = " SELECT * FROM TBPLACA " & C
Form_FrmPLACAPESQ.IDCARRO = Me!FrmPLACAGRID!IDCARRO
IDCARRO = Me.FrmPLACAGRID!IDCARRO
FOTOCARRO = Me.FrmPLACAGRID!FOTOCARRO
Form_FrmPLACAPESQ.IDMORADOR = Me!FrmPLACAGRID!IDMORADOR
IDMORADOR = Me.FrmPLACAGRID!IDMORADOR
FOTOMORADOR = Me.FrmPLACAGRID!FOTOMORADOR
If IsNull(Me.FOTOCARRO) = False Then
  Me.FOTOC.Picture = Me.FOTOCARRO
Else
  Me.FOTOC.Picture = ""
End If
If IsNull(Me.FOTOMORADOR) = False Then
  Me.FOTOM.Picture = Me.FOTOMORADOR
Else
  Me.FOTOM.Picture = ""
End If
Sai:
Exit Sub
Limpa:
Resume Sai
End Sub

vc usa caixa de combinação ou caixa de texto onde informa a placa?

Cleverson

caixa de texto

Poderia disponibilizar a aplicação ou somente o form e tabelas envolvidas.


Cleverson

resolvido valew