... Assinatura do site por 3 anos + Kit MontaRibbons + 3 Livros em PDF + Diversas Revistas (pdf) de brinde, por apenas R$182,00
(
podendo parcelar em até 10 vezes no cartão de crédito)...

Clique aqui e obtenha mais detalhes do nosso kit completo e de como comprar.


Valor monetário por extenso

Existem casos em que precisamos preencher o valor monetário por extenso, como por exemplo cheques e recibos.  O código utilizado para passar o valor por extenso está no módulo mod_extenso, do arquivo exemplo oferecido, basta copiá-lo para o seu projeto.

Usando Access - valor monetário por extenso

Baixe o arquivo e faça o teste:

Clique aqui e baixe o arquivo exemplo.

Abra o formulário frmTeste e entre com um valor monetário qualquer.  Clique no botão Visualizar recibo:

Usando Access - valor monetário por extenso

Observe no evento Ao clicar do botão, que passei o valor monetário para o relatório, através do argumento OpenArgs:

Private Sub btVisualizarRecibo_Click()
DoCmd.OpenReport "rltExtenso", acViewReport, OpenArgs:=Me!txtValorServiço
End Sub

No evento Ao carregar do relatório foi utilizado a função fncExtenso(), responsável em passar o valor monetário para o valor por extenso:

Private Sub Report_Load()
Dim strTexto As String
strTexto = "Recebi do cliente Avelino Sampaio a importância de "
strTexto = strTexto & Format(Me.OpenArgs, "R$0.00") & " ("
strTexto = strTexto & Format(fncExtenso(Me.OpenArgs), "<") & ") pelo(s) 
strTexto = strTexto & serviço(s) de programação e assessoria."
Me!TxtExtenso = strTexto
End Sub

Usando Access - valor monetário por extenso

 

Bom estudo!


 

 


2 comentário(s)

Glenio Giacomet   12/07/2017 07:00:54

Utilitário para realizar backup de um sistema em Acccess.
Não vi e nem achei na internet alguma dica de como fazer um backup a partir do access.
Uma aplicação em Access, que pudesse ter um comando (botao) para fazer backup dos dados.

Avelino Sampaio   12/07/2017 08:43:29

Glenio,

veja se este meu tutorial ajuda (copie cole o link abaixo no seu navegador):

http://www.usandoaccess.com.br/tutoriais/manutencao-e-backup-access-barra-de-progresso.asp?id=1#inicio

Sucesso!


Envie seu comentário: