simafst
Messages postés37Date d'inscriptiondimanche 20 mai 2007StatutMembreDernière intervention11 juin 2010
-
14 mai 2009 à 10:15
simafst
Messages postés37Date d'inscriptiondimanche 20 mai 2007StatutMembreDernière intervention11 juin 2010
-
15 mai 2009 à 16:20
Salut,
je veux mettre un tableau de valeurs dans un dataGrid mais aussi je veux que ce dataGrid soit manipuler à l'aide d'un Scrollbar.
Bon mon probléme c'est que aprés que je remplis le datagrid par les valeurs du tableau il peut pas me reprendre les valeurs :((
SVP s'il y a quelqu'un qui peux m'aider
simafst
Messages postés37Date d'inscriptiondimanche 20 mai 2007StatutMembreDernière intervention11 juin 20101 14 mai 2009 à 12:31
salut ssefyoo,
mon tableau et de dimension 2 mon probléme c'est que aprés le remplissage de tous les valeurs par exemple 100 valeurs si veux retrouver la 20éme valeur à l'aide du scollbar il reste fixe sur les derniéres valeurs
cs_ssefyou
Messages postés119Date d'inscriptionsamedi 3 mai 2008StatutMembreDernière intervention18 juillet 20131 14 mai 2009 à 13:32
re,
si tu cherche une valeur dans ton datagrid et tu veux selectionner la ligne voila comment faire :
for each row as datagridrow in tondatagrid.rows
if row.cells(x).value=Valchercher then
row.selected=true
tondatagrid.currentcell=row.cell(x)
exit for
'dés que tu trouve la premier ligne tu doit 'sortir dela boucle
end if
end for
le x c'est l'index de la cellule
@+
Vous n’avez pas trouvé la réponse que vous recherchez ?
simafst
Messages postés37Date d'inscriptiondimanche 20 mai 2007StatutMembreDernière intervention11 juin 20101 14 mai 2009 à 17:29
RE
merci ssefyou mais mon probléme c'est l'affichage quand je click sur le scrollbar il se fixe sur la derniére ligne il peut pas remonter et réafficher les autres valeurs
simafst
Messages postés37Date d'inscriptiondimanche 20 mai 2007StatutMembreDernière intervention11 juin 20101 15 mai 2009 à 09:13
Private Sub vsbZGrid_Change()
DisplayZodiacData
h = h + 1
End Sub
Private Sub DisplayZodiacData()
tabl = Split(Form1.valeur, ",")
vsbZGrid.Max = 11
If b < tabl.UBound Then
lblCell1(0).Caption = tabl(b)
b = b + 1
end if
End Sub
simafst
Messages postés37Date d'inscriptiondimanche 20 mai 2007StatutMembreDernière intervention11 juin 20101 15 mai 2009 à 16:20
salut,
vsbZGrid_Change() son role consiste qu'à chaque click sur le fléche de la scrollbar il exécute la méthode DisplayZodiacData et vsbZGrid c'est le nom de la scrollbar