boucle probleme !Résolu

Question

Bonjour, 
j'ai un petit soucis avec ma boucle, j'ai l'impression que celle ci ne se termine jamais et du coup impossible de la relancer !
Si quelqu'un veut bien 'aider merci d'avance

Ouverture en scroll d'un picturebox voici mon code :

GFXFrameX1.Visible = True
GFXFrameX1.HeighT = 0
Do Until GFXFrameX1.HeighT > 6930
    GFXFrameX1.HeighT = GFXFrameX1.HeighT + 1
    WBShow.HeighT = 5895
        DoEvents
    Loop

fermeture:
Do Until GFXFrameX1.HeighT < 0
    GFXFrameX1.HeighT = GFXFrameX1.HeighT - 1
        DoEvents
        Loop
    GFXFrameX1.Visible = False

ucfoutu · Answer

Bonjour,
1) Do Until GFXFrameX1.HeighT < 0 
comment espères-tu qu'un contrôle puisse avoir pour hauteur une hauteur négative ?
2) Tu postes dans la section VB.Net, que je ne connais pas
Si, comme le donnent à penser tes autres discussions, tu développes finalement sous VB6 (et non VB.Net) :
--- tu n'es à nouveau pas dans la bonne section (et là, ta négligence et ta légèreté commencent à devenir relou, hein ...)
--- un Frame, sous VB6, à des dimensions minimum. Si on essaye d'aller en deçà, VB6 ramène à ces dimensions et ta boucle ne risque alors pas de s'arrêter !

ucfoutu · Answer

PS il sera au passage également souhaitable que tu veuilles bien accepter de commencer à présenter tes lignes de code entre balises code (comme chacun des développeurs, ici). 
Ces efforts sont la marque minimum de la bonne volonté minimum attendue par cette communauté; Tu seras respecté lorsque tu commenceras à t'en préoccuper.

Boucle probleme !

2 réponses

Discussions similaires