ON ERROR GOTO

MSMJUDAS 21/07/2010 08:23:56
#348001
Vc está comparando de forma errada:

If mskCodigo.Text = tabelas!codigo = True Then

Deixa assim:

If mskCodigo.Text = tabelas!codigo Then
...
End If
JAMESBOND007 21/07/2010 08:55:17
#348005
Coloquei aqui como foi resolvido, par que se alguem tiver a mesma duvida poder ter como exemplo, agradeço a todos uqe me ajudaram.
            If mskCodigo.Text = tabelas!codigo Then
             MsgBox [Ô]Código já existe no banco de dados![Ô], vbExclamation, [Ô]Aviso - Código[Ô]
             Call limpar
             Unload Me
             frmcadcli.Show
            Exit Sub
            Else
            MsgBox [Ô]Código Válido[Ô], vbDefaultButton1, [Ô]Código Válido[Ô]
            End If
Página 2 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar