Discussion :

[GESCOM2000]

Bonjour
Un nouveau poste pour avoir votre avis sur 2 fonction VBA.

la fonction SELECT CASE Toto Case "blabla1","blabla2"..... et IF "blabla1"=toto OR .....OR.....or or or.... THEN blabla

Avec le select case je peux en mettre un paquet mais avec OR je peux en mettre autant sans que ca merdouille?

D'après vous quel est la meilleure des 2 fonctions sans risqué d'avant un bug ou des Ralentissements dans les traitements.

Merci

[unparia]

Bonjour
Rien n'empêche tout masochiste de ne pas se servir de ce qui est simple et mille fois plus lisible (Select Case) au "profit" d'une suite d'expressions conditionnelles (bourrées de OR, de ELSE, ELSE IF, etc ...) .... Bien "gérés", hein ...
Cela devrait parfaitement convenir au pharmacien voisin de ce développeur ou des développeurs qui devraient intervenir pour faire évoluer l'application (vente accrue d'aspirine, etc ...)

[clementmarcotte]

Bonjour,

À l'époque de QuickBasic, (sur MS-DOS, (cela ne me fait pas paraître très jeune)), un fin connaisseur du BASIC avait comparé le résultat de la compilation d'un If then Else et d'un Select Case. Après la compilation, c'était exactement pareil...

Personnellement, c'est ce qui me semble le plus facile à écrire à ce moment-là.

[Invité]

Bonjour,
Si ici l'idée est de faire un sondage entre le select case et les elseif! Je vote select case.

Les elseif augmente les risques de bug lié au risque de se tromper!

Les select case reste toujours plus lisible et maintenable!

[Philippe Tulliez]

Bonjour Clément et Robert,
Je partage tout à fait ce que vous avez écrit.
D'ailleurs lorsque je dispense mes formations VBA, j'évoque le ElseIf mais je déconseille son utilisation au profit de Select Case car effectivement la lecture du code est nettement plus simple et ses possibilités de tests sont multiples.

[Marc-L]

Bonjour,

certaines conditions pouvant être écrites bien plus simplement via Select Case, il suffit juste de lire l'aide VBA …

___________________________________________________________________________________________________________

Je suis Paris, Egypte, Nigeria, New-York, Mogadicio, Barcelone, London, Manchester, Stockholm, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[kiki29]

Salut, à voir si curieux

[unparia]

Pour tout dire :
que l'on choisisse la voie Select Case ou la voie If Then Else, la toute première préoccupation du développeur devrait être la détermination de la ou des occurrence(s) les plus probablement fréquentes *****(en fonction du contexte) , de sorte à cesser de tester de la manière la plus optimisée.
****** il est par exemple assez clair qu'un modulo = 0 par division par 2 est plus fréquent qu'un modulo = 0 par division par 3 ... . Mais c'est là un exemple assez "simplet". D'autres nécessitent plus de finesse, d'expérience, etc ...

Ceci dit : une procédure écrite à coups de If Then Else, Elseif, avec en plus des Or et And impliqués :
- sera plus difficile à lire et à maintenir
- elle occupera plus d'octets (dans la procédure qui, rappelons-le, a des limites de taille)

Voilà ...

[Invité]

A l'occasion d'une autre discutions, j'avais publié le code objet compilé. Le nombre de cycle machine étaient en faveur du select case.

Oui comme le dit UnParia seul l'ordonnancement de la plus forte probabilité à la plus faible peut faire la différence!

[mjpmjp]

bonjour,

À l'époque de QuickBasic, (sur MS-DOS.....

effectivement, à cette époque , j'utilisais : "ON n GOSSUB / GOTO 1,2,3,4"
ce qui ressemble beaucoup à "select case n"

dans certain cas je préférerai : If then ElseIf .... dans d'autres select case

@+JP

[mjpmjp]

re,
pour être plus précis,
je perçois : IF THEN comme une "comparaison" et SELECT CASE comme une "boite de dérivation"

@+JP

[Invité]

Bonjour,
En réalité un if elseif fait un branchement court Jump en assembleur,
Alors qu'un select case fait un branchement long call étiquette en assembleur! C'est un peut comme le if then goto étiquette!

Un branchement cour fait deux cycle machine alors qu'un branchement long en fait 4!

On pourrait donc conclure le elseif plus rapide et bien nom car le select est plus optimisé!

Code select case :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
If  A=Z then toto=1:goto fin
If A=E then toto=2:goto fin
Fin:

Code elseif :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
If A=Z then toto =1 :etiquette1 else  étiquette2 'jump
Étiquette2:
If A=E then toto=2:étiquette1 else toto=3
Étiquette1

[unparia]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Dim toto As Integer, deb As Double, k As Long, titi As String
toto = 10
deb = Timer
'----------------------------------------
For k = 1 To 10000000
  If (toto <= 40 And toto >= 20) Or (toto <= 30 And toto >= 25) Then
     titi = "cas 1"
  ElseIf toto <= 40 And toto >= 22 Then
     titi = "cas 2"
  Else
     titi = "cas 3"
  End If
Next
MsgBox Timer - deb & vbCrLf & titi
'---------------------------------------------------
deb = Timer
 
'-------------------------------------------------
For k = 1 To 10000000
  Select Case toto
    Case 20 To 40, 25 To 30
      titi = "cas 1"
    Case 22 To 40
      titi = "cas 2"
    Case Else
      titi = "cas 3"
  End Select
Next
MsgBox Timer - deb & vbCrLf & titi
'-------------------------------------------

[unparia]

En fait (et facilement constatable) :
Plus est important le nombre de vérifications à faire jusqu'à trouver la bonne occurrence, plus nette est la plus grande agilité de select case par rapport à des If Then Else imbriqués.
En précisant bien que les vérifications se font bien dans le même ordre dans les deux procédés.
Et la chose est encore plus nettement visible lorsque sont impliqués de surcroît des OR, des AND, etc ... dans les vérifications d'occurrences.