Condition inverse de "Type of " [Résolu]

Messages postés
406
Date d'inscription
lundi 9 juin 2003
Dernière intervention
4 septembre 2013
- - Dernière réponse : cs_Exploreur
Messages postés
4824
Date d'inscription
lundi 11 novembre 2002
Dernière intervention
15 novembre 2016
- 17 sept. 2007 à 13:45
Bonjour à tous

J'utilise :

Dim Ctrl As Control
 
For Each Ctrl In Me.Controls
  
 If TypeOf Ctrl Is Shape Then
  .
  .Bla bla
  .
 Endif

Next

ça marche nikel, mais si je voulais la fonction inverse
C'est à dire que si le type n'est pas une shape alors ...
J'ai essayé 

If TypeOf Ctrl Is Not Shape Then

Mais ça marche pas

Merci de votre aide
Bonne journée
Afficher la suite 

Votre réponse

9 réponses

Meilleure réponse
Messages postés
4824
Date d'inscription
lundi 11 novembre 2002
Dernière intervention
15 novembre 2016
3
Merci
Salut,

Je ne sais pas , mais j'aurais fait le contraire moi :

If Not TypeOf Ctrl Is Shape Then

A+
Exploreur

 Linux a un noyau, Windows un pépin

 

Merci cs_Exploreur 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources a aidé 101 internautes ce mois-ci

Commenter la réponse de cs_Exploreur
Messages postés
13368
Date d'inscription
lundi 13 décembre 2004
Dernière intervention
3 février 2018
0
Merci
salut,

allons dont....
faut faire un minimum d'efforts de réflexion andrebernard
Commenter la réponse de PCPT
Messages postés
406
Date d'inscription
lundi 9 juin 2003
Dernière intervention
4 septembre 2013
0
Merci
Tu as absolument raison, malgre que ce soit lundi

Merci beaucoup de ton aide, ça marche
Bonne journée
Commenter la réponse de cs_andrebernard
Messages postés
406
Date d'inscription
lundi 9 juin 2003
Dernière intervention
4 septembre 2013
0
Merci
Tu as raison PCPT
Mais je n'avais jamais utilisé le NOT
J'avais jusqu'a maintenant des comparaisons <> ou = ou > ou <
Donc il me suffisait de mettre l'inverse.

Je sais, c'est la honte ...

Mais faut vraiment parler petit negre pour dire :

Si ce n'est pas le type de control est shape alors

Je me suis fait avoir
Excusez moi du derangement
Mais encore merci a explorer
Commenter la réponse de cs_andrebernard
Messages postés
13368
Date d'inscription
lundi 13 décembre 2004
Dernière intervention
3 février 2018
0
Merci
astuce (si on peut appeler çà comme çà) :

un IF teste uniquement VRAI FAUX, quelque soit le type de condition !

quand tu fais if i>5 then, c'est simplement SI la condition (i>5) est VRAI ALORS

donc If TypeOf Ctrl Is Shape Then c'est If (TypeOf Ctrl Is Shape)=true Then

l'inverse est donc If (TypeOf Ctrl Is Shape)=false Then, (condition = false)
qui s'écrit également  If not(TypeOf Ctrl Is Shape) Then (condition = false)

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
Commenter la réponse de PCPT
Messages postés
4824
Date d'inscription
lundi 11 novembre 2002
Dernière intervention
15 novembre 2016
0
Merci
Re,

YOUPI !!!! Ok...ok...je sort...

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
Commenter la réponse de cs_Exploreur
Messages postés
406
Date d'inscription
lundi 9 juin 2003
Dernière intervention
4 septembre 2013
0
Merci
D'accord, je crois que cette fois j'ai compris.
Je comprend vite, mais faut m'expliquer longtemps

Merci de votre patience
Commenter la réponse de cs_andrebernard
Messages postés
13368
Date d'inscription
lundi 13 décembre 2004
Dernière intervention
3 février 2018
0
Merci
sors pas Explo ^^
ta réponse est bonne, je ne fais qu'expliquer pourquoi  
Commenter la réponse de PCPT
Messages postés
4824
Date d'inscription
lundi 11 novembre 2002
Dernière intervention
15 novembre 2016
0
Merci
Re,

Le "YOUPI" et par raport à ce matin à sa question  concernant la remise à "zéro" d'une variable type dont j'avais dit une belle 'Bip.Bip'...

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
Commenter la réponse de cs_Exploreur

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.