Datagrid en vb6

stNONO Messages postés 3 Date d'inscription vendredi 9 janvier 2009 Statut Membre Dernière intervention 1 juillet 2011 - 2 juin 2011 à 22:30
ingito Messages postés 35 Date d'inscription vendredi 26 juin 2009 Statut Membre Dernière intervention 17 juin 2011 - 6 juin 2011 à 15:02
Salut les amis.je viens solliciter votre aide.En faites j'ai un datagrid qui contient 4 colonnes:Id, NOM, PRENOM,NOTE.
Si une des notes de la colonne "NOTE" est < 12 alors je déplace toute la ligne dans un 2è Datagrid. alors voilà comment j'ai procédé:Derrière un bouton "Deplacer"

if datagrid1.column(3).value > 12 then
msgbox ("Action non autorisée")
Else
Deplacer la ligne vers le 2è datagrid
End

Mon problème est que je sais plus comment écrire l'instruction entre Else et End pour déplacer la ligne.

Merci de bien vouloir m'aider s'il vous plais.

1 réponse

ingito Messages postés 35 Date d'inscription vendredi 26 juin 2009 Statut Membre Dernière intervention 17 juin 2011
6 juin 2011 à 15:02
met ce code dans ton bouton de transfere

FOR J = 0 TO DataGrid1.Columns.Count
DataGrid1.Col = J
DataGrid2.Col = J
FOR I = 0 TO Adodc1.Recordset.RecordCount-1
DataGrid1.Row = I
DataGrid2.Row = I
DataGrid2.Text=DataGrid2.Tex
NEXT

marquer résolu SVP si c ok merci
0
Rejoignez-nous