Si des Instructions VBA ACCESS 2010

Lors de l'utilisation d'un

If Then
'Do Something
Else If
'Do Something
End If

Si la première et la deuxième condition est vraie serait-il exécuter la première ou les deux?

pour quelque raison que quand j'ai ce code:

Dim Report As String

If (DateRange_Pro_TotalCount > 0) Then

        Dim DateRange_Pro_ReportStr As String

        DateRange_Pro_ReportStr = "Total Referrals: " & DateRange_Pro_TotalCount & vbNewLine _

        Report = Report & DateRange_Pro_ReportStr

    ElseIf (DateRange_InPro_TotalCount > 0) Then

        Dim DateRange_InPro_ReportStr As String

        DateRange_InPro_ReportStr = "Total Referrals: " & DateRange_InPro_TotalCount & vbNewLine _

        Report = Report & DateRange_InPro_ReportStr

End If

'next statement prints report variable to textBox

Cette instruction s'exécute uniquement la première condition, même si les deux conditions sont vraies. J'ai changé de "Else if" à la "Fin de Si' et 'Si' ( deux diff. conditionnel relevés au lieu d'une déclaration auprès de deux conditions) et cela a fonctionné.

OriginalL'auteur Padawan | 2012-10-01

  1. 2

    Oui, vous avez raison, il ne s'exécutera que le premier bloc

    De If-then-ELSE (VBA)

    If condition_1 Then
    result_1

 ElseIf condition_2 Then
   result_2
 ...
 ElseIf condition_n Then
    result_n

 Else
   result_else

 End If

    condition_1 à condition_n sont évaluées dans l'ordre indiqué. Une fois un
    la condition est trouvé pour être vrai, l'if-then-ELSE va exécuter les
    le code correspondant et de ne pas évaluer les conditions les plus.

    result_1 à result_n est le code qui est exécuté une fois qu'une condition est
    trouvé pour être vrai.

    OriginalL'auteur Adriaan Stander

  2. 1

    If...ElseIf...EndIf fait exactement ce qu'il suggère en anglais:

    • If la première condition est true, l'exécution du premier bloc.
    • Else, if la deuxième condition est true, l'exécution du deuxième bloc.

    Dans votre cas, vous voulez séparer les deux si les déclarations; elles seront évaluées de manière indépendante quel que soit le résultat de l'autre état.

    OriginalL'auteur lc.