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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Cabeçalho FlexGrid (2ª Tentativa!!!)
Bete
SAPUCAIA DO SUL
RS - BRASIL
Postada em 24/06/2004 16:34 hs         
Pessoal...
 
Não consegui resolver o problema do Cabeçalho do Flex Grid, já postei uma mensagem há alguns dias, o Tom tentou ajudar mas, sem sucesso...
Peço desculpa por ser insistente em postar a mesma dúvida pela segunda vez, mas é que ninguém vai ler minha dúvida tendo tantas outras na frente (mais recentes)... Talvez eu não esteja respeitando as regras do fórum mas... é só dessa vez (2ª e última chance!!!)
 
A dúvida é a seguinte: 
 
Estou mostrando os dados de um banco de dados em access num FlexGrid, com ajuda de um data.
No cabeçalho do FlexGrid (Linha fixa) fica como título das colunas o nome de cada campo da tabela.
Como faço para que o FlexGrid não pegue o nome do campo do banco de dados como cabeçalho, de maneira que eu possa colocar o nome que eu quiser nesse cabeçalho.
 
Exemplo:

Nome do campo no banco do access que aparece na linha fixa do FlexGrid: cod
Nome que eu quero que fique: Código do produto
 
Valeu!!!
 
 

Elisabete Santana
Sapucaia do Sul/RS
www.saocamiloesteio.com.br

     
FatBoy
Pontos: 2843 Pontos: 2843
LONDRINA
PR - BRASIL
ENUNCIADA !
Postada em 24/06/2004 16:45 hs            
msflexgrid1.formatstring="<Codigo|^Data|<Nome|>Valor"
msflexgrid1.ColWidth(0)=1000
msflexgrid1.ColWidth(1)=1000
msflexgrid1.ColWidth(2)=10000
msflexgrid1.ColWidth(3)=5000
 
onde
< - alinhamento a esquerda
^ - alinhamento centro
> - alinhamento a direita
 
Espero ter ajudado
 
t+
 
   
Mauricio
não registrado
ENUNCIADA !
Postada em 24/06/2004 17:06 hs   

Olá Bete

Tente copiar o código abaixo e adaptá-lo as suas necessidades

With grdAluno

.Rows = 0

.Rows = 2

.FixedRows = 1

.Cols = 6

.FixedCols = 0

'

'Determinar a largura das colunas

'

.ColWidth(0) = 3000 'Aluno

.ColWidth(1) = 700 'Materia

.ColWidth(2) = 10 'Nota bimestre 1

.ColWidth(3) = 10 'Nota bimestre 2

.ColWidth(4) = 10 'Nota bimestre 3

.ColWidth(5) = 10 'Nota bimestre 4

'

'Determinar o alinhamento das colunas

'

.ColAlignment(0) = 0

.ColAlignment(1) = 2

.ColAlignment(2) = 2

.ColAlignment(3) = 2

.ColAlignment(4) = 2

'

'Cabeçalho da flex grid

'

.Row = 0

.Col = 0

.Text = "Aluno"

.Col = 1

.Text = "Materia"

.Col = 2

.Text = "Bimestre 1"

.Col = 3

.Text = "Bimestre 2"

.Col = 4

.Text = "Bimestre 3"

.Col = 5

.Text = "Bimestre 4"

.Enabled = False

End With

 

   
Eriston
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 24/06/2004 17:22 hs            
Eu faço da seguinte forma:
 
'Cabeçalho FlexGrid
 
    FlexGrid.TextMatrix(0, 1) = "nome"   '0 = nº da linha(row)  1 = nº da coluna(col)
    FlexGrid.TextMatrix(0, 2) = "endereco"
    FlexGrid.TextMatrix(0, 3) = "numero"
    FlexGrid.TextMatrix(0, 4) = "etc"
   
Achou que isso pode ajudar.
 
t+
 
Eriston
   
Página(s): 1/1    

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