FORMATAR CAMPOS FLEXGRID
Estou fazendo a inclusao de dados no grid e gostaria de saber como alinhar estes dados
With Grade
CODIGO = 0
.Rows = .Rows + 1
Grade.TextMatrix(.Rows - 1, 1) = CODIGO + 1 [ô]centralizar
Grade.TextMatrix(.Rows - 1, 2) = CBProduto.Text [ô]esquerda
Grade.TextMatrix(.Rows - 1, 3) = TQuantidade.Text [ô]centralizar
Grade.TextMatrix(.Rows - 1, 4) = TUNITARIO.Text [ô]centralizar
Grade.TextMatrix(.Rows - 1, 5) = TUNITARIO.Text * TQuantidade.Text [ô]direita com ,00
End With
With Grade
CODIGO = 0
.Rows = .Rows + 1
Grade.TextMatrix(.Rows - 1, 1) = CODIGO + 1 [ô]centralizar
Grade.TextMatrix(.Rows - 1, 2) = CBProduto.Text [ô]esquerda
Grade.TextMatrix(.Rows - 1, 3) = TQuantidade.Text [ô]centralizar
Grade.TextMatrix(.Rows - 1, 4) = TUNITARIO.Text [ô]centralizar
Grade.TextMatrix(.Rows - 1, 5) = TUNITARIO.Text * TQuantidade.Text [ô]direita com ,00
End With
olha só o cabeçalho do flexgrid crio assim
da maneira acima as colunas ficarão alinhadas conforme os caracteres especiais ou seja
^ antes do nome alinha ao centro, > alinha a direita, <alinha a esquerda
porém se vc não quiser alterar nada use assim
With MSFlexgrid1
.FixedRows = 1
.FixedCols = 0
.Rows = 1
..FormatString = [Ô]^Codigo|^CodProduto|>quantidade[Ô]
End Wiith
da maneira acima as colunas ficarão alinhadas conforme os caracteres especiais ou seja
^ antes do nome alinha ao centro, > alinha a direita, <alinha a esquerda
porém se vc não quiser alterar nada use assim
With MSFlexGrid1
.ColAlignment(1) = vbCenter
.ColAlignment(2) = vbRightButton
End With
Tópico encerrado , respostas não são mais permitidas