Boa tarde a todos!!! pessoal estou a precisar mais uma vez da ajuda do fórum, tenho uma consulta no meu formulário onde busco dados em banco de dados sql server, no campo data ele me exibe a data no form,ato que o sql grava como padrão " aaaa/mm/dd" mas eu queria que fosse exibido "dd/mm/aaaa" eu uso o seguinte código para fazer a consulta.
Desde ja sou muito grato a todos...
- Código:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String
Dim Linha As Integer
Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT * FROM dbo_tblProduto WHERE codProduto=" & Me.txtCodProduto, dbOpenDynaset, dbSeeChanges)
If Not rs.BOF Then
Me.txtloja = rs("numLoja")
Me.txtFornecedor = rs("fantasiaFornecedor")
Me.txtStatusProduto = rs("statusProduto")
Me.txtDataCadastro = rs("dataCadastro")
Me.txtUnidade = rs("unidade")
Me.txtDescricaoProduto = rs("descricao")
Me.txtEstoqueMini = rs("qtd_Minima")
End If
rs.Close
Set rs = Nothing
db.Close
Set db = Nothing
Desde ja sou muito grato a todos...