Olá a todos do fórum.
Bom, já pesquisei no fórum e li inúmeros exemplos de como formatar um campo data.
Acontece que depois de muitas tentativas sem sucesso, estou com forte impressão que a coisa tem que ser resolvida no próprio código que estou usando.
O código, que exibo abaixo, foi tirado aqui do fórum baseado numa aplicação do Agravina e possívelmente inspirada na aplicação do JPaulo Parcelas2008:
Após executado, a listbox que exibe os dados gravados me retorna a data que era no formato dd/mm/yyyy, assim mm/dd/yyyy, e desta mesma forma grava na tabela.
Um outro detalhe é que o valor padrão do meu campo Data (CpData) é =Date$, que quando o form abre o formato carregado é mm/dd/yyyy, mas quando entro no campo e utilizo o selecionador de datas o formato fica dd/mm/yyyy, como quero, contudo quando gero as parcelas e grava no formato mm/dd/yyyy.
Sei para os grandes participantes deste fórum a questão sera resolvida com poucas linhas de código.
Aguardando.
Bom, já pesquisei no fórum e li inúmeros exemplos de como formatar um campo data.
Acontece que depois de muitas tentativas sem sucesso, estou com forte impressão que a coisa tem que ser resolvida no próprio código que estou usando.
O código, que exibo abaixo, foi tirado aqui do fórum baseado numa aplicação do Agravina e possívelmente inspirada na aplicação do JPaulo Parcelas2008:
- Código:
Dim I As Integer
Dim StrDateAdd As Date
Dim StrValorParc As Double
Dim Parc As String
StrValorParc = Me.txtValorMês
For I = 1 To Me.txtParc
StrDateAdd = DateAdd("m", 1 * I, Me.txtData)
StrParc = I & "/" & Me.txtParc
CurrentDb.Execute "INSERT INTO tblExemplo(CpNome, CpMatrícula, cpCompra,CpData,CpValor, CpConveniada)" _
& " Values(""" & tNome & """, """ & cboMatricula & """, """ & Me.txtDescricao.Value & """,#" & StrDateAdd & "#, """ & StrValorParc & """, """ & cboConveniada & """);"
Next
Me.lstParcelas.Requery
Após executado, a listbox que exibe os dados gravados me retorna a data que era no formato dd/mm/yyyy, assim mm/dd/yyyy, e desta mesma forma grava na tabela.
Um outro detalhe é que o valor padrão do meu campo Data (CpData) é =Date$, que quando o form abre o formato carregado é mm/dd/yyyy, mas quando entro no campo e utilizo o selecionador de datas o formato fica dd/mm/yyyy, como quero, contudo quando gero as parcelas e grava no formato mm/dd/yyyy.
Sei para os grandes participantes deste fórum a questão sera resolvida com poucas linhas de código.
Aguardando.