OVH Cloud OVH Cloud

comparaison

1 réponse
Avatar
didier
Bonjour

J'ai un formulaire avec un sousformulaire. A partir de ce=20
sous formulaire j'ouvre un autre formulaire sur lequel je=20
viens remplir un champs ind=E9pendant. Dans ce formulaire=20
j'ai un bouton de commande qui teste
If Forms![form1]![ctrl1]>Forms![formprin]![sousform]!
[ctrl]......
....
End If
If Forms![form1]![ctrl1]<Forms![formprin]![sousform]!
[ctrl]......
....
End If
Si je modifie la valeur de mon champ ind=E9pendant il voit=20
toujours [crtl1]>[ctrl] quelque soit la valeur que mise=20
dans le champ ind=E9pendant. ctrl1 et ctrl ont des valeurs=20
num=E9riques

J'ai essay=E9
If Me.ctrl1>Forms![formprin]![sousform]![ctrl]......
....
End If
If Me.ctrl1<Forms![formprin]![sousform]![ctrl]......
....
End If
mais j'ai le m=EAme r=E9sultat tant que je modifie pas la=20
valeur du champs ind=E9pendant cela fonctionne d=E9s que je=20
viens la modifier il prend la condition [crtl1]>[ctrl]

Quelqu'un voit-il pourquoi car moi je ne comprend pas

1 réponse

Avatar
?Lo»Paris?
Bonjour Didier,

Tu doit faire référence à la propriété .Text de ton contrôle, sinon tu
n'obtiendra pas la valeur mise à jour.

Voici un exemple :

If (me.ctrl1) > (Forms("formprin").form![sousform].form![ctrl].text) then
...

Autre chose n'oublie pas qu'une zone de texte retourne un valeur .. texte
(d'où la prop .Text), dans ton cas il serait bien de faire un conversion
explicite du type de donnée avec clng, cint, ou d'utiliser la fonction Val :

Dim lVal1 as long
dim lVal2 as long

lVal1 = clng(me.ctrl1)
lVal2=clng(Forms("formprin").form![sousform].form![ctrl].text)

OU

If (val(me.ctrl1)) >
(val(Forms("formprin").form![sousform].form![ctrl].text)) then ...

--
°Laurent°
"didier" a écrit dans le message de
news:239f001c45ec5$27b9c1f0$
Bonjour

J'ai un formulaire avec un sousformulaire. A partir de ce
sous formulaire j'ouvre un autre formulaire sur lequel je
viens remplir un champs indépendant. Dans ce formulaire
j'ai un bouton de commande qui teste
If Forms![form1]![ctrl1]>Forms![formprin]![sousform]!
[ctrl]......
....
End If
If Forms![form1]![ctrl1]<Forms![formprin]![sousform]!
[ctrl]......
....
End If
Si je modifie la valeur de mon champ indépendant il voit
toujours [crtl1]>[ctrl] quelque soit la valeur que mise
dans le champ indépendant. ctrl1 et ctrl ont des valeurs
numériques

J'ai essayé
If Me.ctrl1>Forms![formprin]![sousform]![ctrl]......
....
End If
If Me.ctrl1<Forms![formprin]![sousform]![ctrl]......
....
End If
mais j'ai le même résultat tant que je modifie pas la
valeur du champs indépendant cela fonctionne dés que je
viens la modifier il prend la condition [crtl1]>[ctrl]

Quelqu'un voit-il pourquoi car moi je ne comprend pas