[VB(A)] Problème de boucle

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VB(A)] Problème de boucle

Loom the Gloom

Even coders get the blues...

For i = 1 To 20
b = False

If Me("caseSource" & i).Visible Then Me("caseSource" & i).SetFocus
If Me("caseSource" & i).Value = -1 Then
b = True
End If
Me("caseSource" & i).ControlSource = ""
If b Then
Me("caseSource" & i).Value -1
End If

Next

cette simple boucle plante à la deuxième échéance, mais seulement à la 2e, et pas la première. Voyez vous pkoi ?

[jfdsdjhfuetppo]--Message édité par Loom the Gloom le 30-05-2002 à 09:00:35--[/jfdsdjhfuetppo]

---------------
Music|Market|Feed|Loom|DVD

Publicité

Loom the Gloom

Even coders get the blues...

bon, je récapitule, j'ai 20 cases à cocher auxquelles est affecté à chaque fois une source de controle de données.
je veux que cette boucle m'efface la source de controle, mais si la case était cochée, je veux qu'elle le soit encore après...

c mieux ?

---------------
Music|Market|Feed|Loom|DVD

Loom the Gloom

Even coders get the blues...

l'erreur qui apparait est l'erreur 57097 : "erreur définie par l'application ou par l'objet"

kes que ça veut dire ?

---------------
Music|Market|Feed|Loom|DVD

mareek

Et de 3 \o/

Loom the Gloom a écrit a écrit :

For i = 1 To 20
b = False

If Me("caseSource" & i).Visible Then Me("caseSource" & i).SetFocus
If Me("caseSource" & i).Value = -1 Then
b = True
End If
Me("caseSource" & i).ControlSource = ""
If b Then
Me("caseSource" & i).Value -1
End If

Next

ya pas un problème là ?

---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack

Loom the Gloom

Even coders get the blues...

mareek a écrit a écrit :

ya pas un problème là ?

si tu parles du =, il y est dans ma citation...
sinon, je vois pas ??

---------------
Music|Market|Feed|Loom|DVD

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VB(A)] Problème de boucle

Sujets relatifs
[Java] Problème de conception lié aux interfaces	[kava] Probleme avec un JTree
probleme de Jar	Probleme de rebbot lor de la compilation sous vc++ et win2k
[Visual C++] Problème avec _beginthread... [Allons plus loin]	[SQL] Problème de requête !! Help !
[Interbase] Problème lors de l'affichage d'une exception	Un probleme de package !!!!!!!!!!!!!!!!!
problème avec getch() ---> et les touches spéciales	DELPHI Lire une ListView avec le Handle, probleme, aidez moi svp
Plus de sujets relatifs à : [VB(A)] Problème de boucle

Page générée en 0.029 secondes