Comment vérifier l'encontre d'une liste de valeurs dans une instruction if?

Je suis en train d'écrire une instruction if comme ceci:

if var [is any of 1,4,5,6,12] then do stuff

Mais je ne connais pas la syntaxe de VBA, autres que:

if var=1 or var=4 or var=5...

qui semble un peu maladroit. Est-il un autre moyen?

  • utiliser un select case déclaration
  • cette déclaration ont également une négation d'elle ? quelque chose comme "les autres" ? Ou l'équivalent de "non"...?
  • j'ai mis à jour mon code de réponse
  • si la réponse à votre question s'il vous plaît n'oubliez pas de définir la tique à la bonne réponse.
  • "d'autre" ne semble pas fonctionner ici
InformationsquelleAutor horace_vr | 2015-09-10
  1. 11

    Vous pouvez utiliser un Sélectionnez Cas déclaration:

    select case var
case 1,4,5,6,12
  'do something
case else
  'alternative
end select
    • L'instruction ELSE n'est pas de travail, sauf à l'intérieur d'une instruction if
    • déjà eu. il avait à bo case else
    InformationsquelleAutor psychicebola
  2. 1

    Vous pourriez faire une liste de nombres, puis dans une boucle for pour comparer ces:

    dim newNumber as Integer
dim compareList as new List Of(int)

for count as integer = 0 to compareList.count - 1
    if newNumber = compareList(nCount)
       'Do Stuff
    end if
next

    C'est une manière simple de faire ce que j'aime faire, mais ils peuvent obtenir le rendement intensif si vos listes sont vraiment gros/vous voulez faire beaucoup de code dans le "si" de la boucle.

    InformationsquelleAutor SeanS