У меня есть 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