[Resolvido]comparar campos

como fazer o seguinte
comparar campo1 com campo2 se o valor do campo1 for maior q campo2 emite mensagem de sim ou não

se sim segue com evento se não cancela
como fazer esta comparação entre campos
campos com valores de moeda

Olá, no evento antes de atualizar do campo2:

Dim strResposta As String
 If Me.Campo1 > Campo2 Then
             
   strResposta = MsgBox("Campo1 é maior que campo2 & vbCrLf _
& "Deseja continuar assim mesmo?", _
   vbYesNo + vbCritical + vbDefaultButton2, "Alerta")
   If strResposta = vbNo Then
   Me.Undo
   Cancel = True
   End If
 End If
 Exit Sub

Valeu beto funcionou perfeitamente!
obrigado!

Saudações do fórum pelo retorno e fechamento do tópico.

Amigo agravina, faltou marcar o botão resolvido.

verdade esqueci o resolvido