USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Como formatar uma coluna no MSFLexGrid
JSFF
SÃO PAULO
SP - BRASIL
Postada em 17/05/2007 14:05 hs            
Certo.
 
Você já tem algum código escrito para isso? Se tiver, pode postá-lo aqui?
 
 
JSFF
     
DCM
não registrado
Postada em 17/05/2007 14:14 hs   
Só fiz a conexão do MSFlexGrid com o banco de dados, não tem codigo referente a isso porque estou usando o DataControl para isso....
Para formatar a coluna, como estavamos falando antes, estou tentanto com o que vc me forneceu, acho que é só isso! Emoções
     
JSFF
SÃO PAULO
SP - BRASIL
Postada em 17/05/2007 15:10 hs            
Entendo, amigo.
 
O problema disso está no modo como o MSFlexGrid trabalha com o DataControl, porque, nesse caso,  a carga dos dados é feita de uma maneira implícita, o que não nos deixa meios para uma formatação, uma verificação etc. desses dados. Deve-se encontrar um meio de formatar esses dados depois de serem carregados, não vejo outra saída... Francamente, temos um probleminha pela frente...
 
 
JSFF
TÓPICO EDITADO
   
DCM
não registrado
Postada em 17/05/2007 15:22 hs   
Eu conseguifazer com o código que vc me passou, eu fiz assim:
MSFlexGrid1.TextMatrix(1, 6) = Format(2, "##,##0.00")
o problema é q só fica formatado a 1ª linha da coluna nº 6 e só fica o valor 2,00... 
 
Pensei assim: como fazer ele VER todas as linhas da coluna 6 e ainda não mudar o valor.
 
Tem ideia se isso funciona e como????? Emoções
 
     
JSFF
SÃO PAULO
SP - BRASIL
Postada em 17/05/2007 15:46 hs            
Bom, vejamos.
 
Isso garantirá a formatação correta da coluna 6:
 
MSFlexGrid1.TextMatrix(<Lin>, 6) = _
Format(MSFlexGrid1.TextMatrix(<Lin>, 6), "##,##0.00")

mas deve ser colocado em um laço do tipo For...Next, por exemplo. 

O que tenho em mente é o que se segue:

Dim lQtdeRegs As Long, i As Long

SeuDataControl.Recordset.MoveL a s t
lQtdeRegs = SeuDataControl.Recordset.RecordCount
SeuDataControl.Recordset.MoveF i r s t

For i = 1 To lQtdeRegs
          MSFlexGrid1.TextMatrix(i, 6) = _
          Format(MSFlexGrid1.TextMatrix(i, 6), "##,##0.00")
Next i

Mas veja bem, essa é apenas uma idéia de como pode ser feita essa formatação, o que não esgota a possibilidade de outras idéias, porém, é a única que tenho no momento. Acredito que esteja tudo muito bem explícito nesse código, dispensando maiores explicações.

Coloque o código, adaptando-o, óbvio, no evento Form_Load adequado e faça os devidos testes.

Vamos em frente!

JSFF

 

TÓPICO EDITADO
   
DCM
não registrado
Postada em 17/05/2007 16:27 hs   
JSFF c é o cara velho!!!!
 
Deu cero, ficou perfeito!!!!
Agradeço por toda atenção que Deus te abençoe....
ATÉ + BRIGADOOOOOOOOOOOOOOOOOOOOOO
 
TOPICO ENCERRADO
     
Página(s): 2/2     « ANTERIOR  


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2026   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página