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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  FLEXGRID ou DATAGRID
comendador
SÃO GONÇALO
RJ - BRASIL
Postada em 09/02/2011 09:00 hs            
fala feras, me ajudem outra vez! Olha só eu preciso fazer uma coisa que acho que vai dar uma sofisticação show ao meu programa! Pois bem, eu tenho no BD um campo chamado "quant_livro", que é aonde ponho a quantidade de livros que foram cadastrado.

Pois o que gostaria é o seguinte, quando alguém fizer uma pesquisa dos livros no BD, no objeto grid (tanto faz se for o flexgrid ou datagrid)

Nome do Livro               |  Quantidade de Livros | Valor do Emprestimo
  História dos Hebreus    |                           5    |            R$ 7,80  
  Os Mártires                 |                           2    |            R$ 4,80  
  História de um Herói    |                           12   |            R$ 2,50

Agora vem o grande barato: O que quero é o seguinte, que quando a QUANTIDADE DE LIVROS for >6 a linha aonde este livro está, apareça da COR VERDE, quando QUANTIDADE DE LIVROS for <6 and >3 , a linha aonde este livro está, apareça da COR VERDE e quando QUANTIDADE DE LIVROS for <=3 , a linha aonde este livro está, apareça da COR VERMELHA!

Claro que o grid sera carregado via código, ou seja  DO WHILE, para carregar os registros

Não sei se fui bem claro, vou tentar formular melhor a pergunta da próxima vez, só que o objeto grid tem que ser ou FLEXGRID ou DATAGRID!

Jesus abençoe aquele que de bom grato me ajudar!


TÓPICO EDITADO
   
Juan Carlos R.A
Pontos: 2843
MACEIO
AL - BRASIL
ENUNCIADA !
Postada em 09/02/2011 10:35 hs            
Cara usa deacodo sua condiçao :

CellForeColor=VbRed
CellForeColor=vbGreen
CellForeColor=VbBlue

olha esse link:

http://www.vbmania.com.br/pages/index.php?varModulo=Forum&varMethod=abrir&varID=329709
   
Juan Carlos R.A
Pontos: 2843
MACEIO
AL - BRASIL
Postada em 09/02/2011 10:45 hs            
no do while ou for vc faz essa condiçao:

For x = 1 To 3
    MSFlexGrid1.TextMatrix(x, 1) = "aluno"
    MSFlexGrid1.TextMatrix(x, 2) = 15 + x
    MSFlexGrid1.Row = x
    MSFlexGrid1.Col = 2
    If MSFlexGrid1.TextMatrix(x, 2) > 16 Then
        MSFlexGrid1.CellForeColor = vbRed
    Else
        MSFlexGrid1.CellForeColor = vbBlue
    End If
    MSFlexGrid1.TextMatrix(x, 3) = "preco"
Next
TÓPICO EDITADO
   
comendador
não registrado
Postada em 09/02/2011 13:28 hs   
Valeu Juan só tu mesmo heim. Abraço e muito obrigado!
     
comendador
SÃO GONÇALO
RJ - BRASIL
ENUNCIADA !
Postada em 10/02/2011 08:17 hs            
Caríssimo Juan Carlos, olha só, o código que vc me passou dá esse erro "subscript out of range"!
   
Juan Carlos R.A
Pontos: 2843
MACEIO
AL - BRASIL
ENUNCIADA !
Postada em 10/02/2011 14:55 hs            
Oi comendador. deve estar dando erro pq  nas propiedades do grid eu coloquei cols=4. ai va funcionar. Esso ai so foi um teste, certo. o flexgrid traz so 2 row e 2 cols, nesse teste eu coloque 4 colunas.
   
Página(s): 1/2      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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