MSHFLEXGRID

USUARIO.EXCLUIDOS 18/01/2005 07:55:17
#61500
Por acaso alguem saberia me informar pq toda vez que mando inserir um item na grid, na 2 vez ele nao da certo ?
Citação:


MSHGRID.AddItem _
C1 & vbTab & _
C2 & vbTab & _
C3 & vbTab & _
C4

If Trim(MSHGRID.TextMatrix(1, 1)) = "" Then MSHGRID.RemoveItem 1
LCSD 18/01/2005 09:12:17
#61513
Project

Bom Dia

Por que insere e depois Remove? (RemoveItem)
[s50]
USUARIO.EXCLUIDOS 18/01/2005 22:56:01
#61687
pq toda vez que insiro (a primeira vez), a primeira linha vem em branco.

como corrigir ?
LCSD 19/01/2005 07:10:39
#61709
Project

Fiz o teste abaixo com o MSHFlexGrid e tudo ocorreu como o esperado.

Private Sub Command3_Click()
Dim C(4) As String
C(0) = "001"
C(1) = "Produto "
C(2) = "5,00"
C(3) = "15"

MSFlexGrid1.AddItem vbTab & C(0) & vbTab & _
        C(1) & vbTab & _
        C(2) & vbTab & _
        C(3)
     
'    If Trim(MSFlexGrid1.TextMatrix(1, 1)) = "" Then MSFlexGrid1.RemoveItem 1

End Sub


Veja no seu teste se está tudo ok.
[s92]
Página 1 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar