Цикл булевых переменных - PullRequest
0 голосов
/ 16 января 2012

У меня есть 8 логических переменных, и мне нужно иметь возможность добавить электронное письмо к строке электронной почты для каждого логического значения, которое имеет значение true.Я не знаю, как это сделать, не написав миллион утверждений.Вот кое-что из того, что у меня есть:

   if bIsBlue then
      strEmailTo = strSalesEmail
      strEmailTo = strEmailTo & ", " & varBlueGrp
   End if
   if bIsRed then
      strEmailTo = strSalesEmail
      strEmailTo = strEmailTo & ", " & varRedGrp
   End if
   if bIsGreen then
      strEmailTo = strSalesEmail
      strEmailTo = strEmailTo & ", " & varGreenGrp
   End if
   if bIsBrown then
      strEmailTo = strSalesEmail
      strEmailTo = strEmailTo & ", " & varBrownGrp                            
   End if
   if bIsBlue and bIsRed then
      strEmailTo = strSalesEmail
      strEmailTo = strEmailTo & ", " & varBlueGrp & ", " & varRedGrp
   End if
   if bIsBlue and bIsGreen then
      strEmailTo = strSalesEmail
      strEmailTo = strEmailTo & ", " & varBlueGrp & ", " & varGreenGrp
   End if

1 Ответ

1 голос
/ 18 января 2012

Я предлагаю сделать массив этих логических переменных, а затем выполнить итерацию. Вы можете сделать более быстрый доступ ко всем переменным.

...