[Resolvido]Referência a Formulário em Módulo Global

Olá colegas.

Criei uma função no módulo de um subform. e agora estou tentando transformá-la em uma Função pública, num módulo global, para ser utilizada por vários formulários.

A referência aos controles deste formulário eram feitas por Me., mas no módulo global ela não é aceita.

Como eu poderia refazer esta referência?
Encontrei no NorthWind (do Access) este o código abaixo:

Public Funcion CalcTributos ()
With CodeContextObject
...procedimentos e chamadas...
End With
End Function

Ele é o mais recomendado.

Muito grato.

Cara pelo que entendi, é só voce trocar Me. como referencia e colocar o nome do formulário.

Eu utilizo desta forma.
Um exemplo

Me.txtcalculaTotal

Por
Nome_do_formulario.campo
Form_Calulo.txtcalculaTotal

Olá

Faça a seguinte alteração:

Public Funcion CalcTributos (frm as form)
With CodeContextObject
...procedimentos e chamadas...
CalcTributos = frm!campoA + frm!campoB
End With
End Function


Chamando pela função, basta usar o ME

call CalcTributos(me)

Sucesso!

Ok Avelino. Vou testar.

Muito bom poder contar com sua ajuda.

Muito obrigado.

Avelino,

utilizando a referência frm ainda será preciso usar With CodeContextObject?