[Resolvido]Como dizer que um campo em formato moeda é maior que R$ 0,00 em VBA

Olá,
Tenho o controle SUBSOMA que soma assim:
Aba Formato: Formato: "R$ "#.##0,00;"(R$ "#.##0,00)
=Nz([SubForm].[Formulário]![controleA]+[SubForm].[Formulário]![controleB])

Preciso dizer que quando este controle for R$ 0,00 um aviso aparecerá:
If Me.subsoma > "" Then
Me.rotDevMaisRec.Visible = True
Else
Me.rotDevMaisRec.Visible = False
End If

Não está funcionando...

Obrigado, Luz e Paz!

boa noite meu amigo tenta assim
If Me.subsoma =0 Then
Me.rotDevMaisRec.Visible = True
Else
Me.rotDevMaisRec.Visible = False
End If

Obrigado, mas não resolve... Já tentei com 0, "", Null... nada dá certo

Olá,

Tente isso:

Código:



If IsNull(Me.subsoma) Or Trim(Me.subsoma) = Empty Then
    Me.rotDevMaisRec.Visible = True
Else
    Me.rotDevMaisRec.Visible = False
End If



Teria como vc enviar parte do seu bd

Desculpa Alexandre enviamos juntos

Relaxa @Marcelo Marques
Estamos juntos pra ajudar...
abs

Obrigado pessoal, mas não deu certo ainda...
Alexandre, o que está indicado pela seta azul tem que "visible=False", quando o que está indicado pela seta vermelha for "R$ 0,00".



Luz e Paz!

Falta de pensar.... rs

Deixei o campo onde aparece (Devedor + Recebidos) visível e inseri:
=SeImed([subsoma]='0';'';'(Devedor + Recebidos)')

Assim, toda vez que finalizo a digitação das datas ou clico "Recalcular", adicionei -> Me.campo.Requery


Obrigado! Luz e Paz