[Resolvido]Formatar Coluna calculada

Olá pessoal,

Estou precisando formatar uma coluna calculada dentro de um Select.


Dim strsql As String
strsql = "SELECT IdItem, IdNota, Iten_Codigo As Código, Iten_Descricao As Descrição, Iten_Qtde As Qtde, Iten_Valor As Valor, Nz(([Iten_Qtde]*[Iten_Valor]),0) AS [Valor Total] "
strsql = strsql & "FROM tblItensNota WHERE IdNota = " & Me!IdNota.Value & " ORDER BY Iten_Codigo;"
Me!ListaItens.RowSource = strsql

Veja que foi criada uma coluna calculada como ultima coluna do select, preciso formatar essa coluna como Grana.

Alguém pode me ajudar ??

Desde de já agradeço.

Pessoal,

Achei uma solução.

Veja:

Dim strsql As String
strsql = "SELECT IdItem, IdNota, Iten_Codigo As Código, Iten_Descricao As Descrição, Iten_Qtde As Qtde, Iten_Valor As Valor, Format(Nz(([Iten_Qtde]*[Iten_Valor]),0),'R$ #,#0.00') AS [Valor Total] "
strsql = strsql & "FROM tblItensNota WHERE IdNota = " & Me!IdNota.Value & " ORDER BY Iten_Codigo;"
Me!ListaItens.RowSource = strsql

Obrigado!!

Se não complicar muito sua vida, existem maneiras mais fáceis...
Voce viu a janela de propriedade do Campo da consulta ?

julianonic3,

Obrigado por sua ajuda, a janela de propriedades não iria resolver meu problema.

De qualquer forma já está resolvido.


Muito obrigado!!