bollywood actresses hair loss hair rehab london contact number cheap hair extensions brazilian curly hair with closure hair extension fails human hair wigs black ponytail hairstyles 2018 sunny hair extensions uk hair extensions remy hair extensions weft koko one piece hair extensions clip hair
Trabalhar com caracteres especiais em um controle Listbox
Trabalhar com caracteres especiais em um controle Listbox

Adquira a assinatura vitalícia do site e passe a ter acesso aos arquivos exemplos, vídeos, revistas, livros e ao kit de montagem de ribbons. Você terá suporte por e-mail, caso necessite tirar dúvidas pontuais. Clique AQUI e veja como obter um dos nossos planos. Clique AQUI e faça uma visita a seção Downloads do site e verifique as centenas de arquivos que estará à sua disposição. Clique AQUI e faça uma visita a seção Vídeos do site e veja a lista que estará disponível ao se tornar o nosso assinante vitalício. Clique AQUI e saiba mais detalhes sobre o kit de montagem de ribbons (deixe seus aplicativos com aspecto profissional).



Podemos trabalhar com caracteres empecias em um controle Listbox, através da função ChrW$() do Access. Como exemplo vou substituir o resultado de um campo do tipo Sim/Não por um símbolo desejado.  Observe o campo do tipo Sim/Não, indicando se a peça está ou não, descontinuada:

Usando Access - Função ChrW$

 

Quero exibir o símbolo "X", substituindo o SIM e deixar em branco os que estão com o NÃO. Veja que os marcados com o "X" representam as peças que estão descontinuadas!

Usando Access - Função ChrW$

 

Observe a parte em vermelho, no código abaixo, aonde utilizo a função ChrW$(), que irá exibir o símbolo "X" no lugar do SIM.  Veja também que utilizei dois apóstrofos contínuos ('') para suprimir o NÃO.

Private Sub Form_Load()
dim strSql$
 
strSql = "SELECT IdEstoque,Peça,fncAjustaCampo([valorPeça]) As ValorP, "
strSql = strSql & "iif(Descontinuado=-1,ChrW$(10007),'') FROM tblEstoque "
strSql = strSql & "ORDER BY [Peça];"
 
Me!Lista2.RowSource = strSql
End Sub

Baixe o arquivo:

Clique aqui e baixe o arquivo exemplo.

Abra o relatório rltListaSimbolos do exemplo oferecido e veja alguns dos símbolos listados.

Usando Access - Função ChrW$

Desafio:

Marque a peça "1e", que está em promoção,  com o símbolo bola de futebol (código 9917), conforme imagem abaixo:

Usando Access - Função ChrW$

 

Bom estudo!


 

 


Não há comentário

Envie seu comentário: