问题 如果...那么......之后有多个语句


一个非常简单的问题:考虑一个 If...Then...Else 在VBA中的指令,如何在之后分离多个指令 Then?换句话说,我应该写点什么

If condition [ Then ]    
   [ statement1 ] & [statement2] 
Else [Else statement] (i.e. using "&"),

要么

If condition [ Then ]         
   [ statement1 ] And [statement2] 
Else [Else statement] (i.e. using "And"),

或其他一些分隔符/命令?


11976
2018-03-17 10:09


起源

分隔符=新行 - assylias
这取决于你在做什么。 &是字符串的连接器 "a" & "b";而且合乎逻辑 If a And b then  msdn.microsoft.com/en-us/library/752y8abs(v=vs.80).aspx - Fionnuala


答案:


多个语句由新行分隔:

If SkyIsBlue Then
  StartEngines
  Pollute
ElseIf SkyIsRed Then
  StopAttack
  Vent
ElseIf SkyIsYellow Then
  If Sunset Then
    Sleep
  ElseIf Sunrise or IsMorning Then
    Smoke
    GetCoffee
  Else
    Error
  End If
Else
  Joke
  Laugh
End If

18
2018-03-17 10:55



谢谢代码:它的工作原理。 - Avitus
它对我也有用。我跑了,笑了:)。 - Doug Glancy
我不是为什么,但它让我想起了Warhammer 40K :-)再次感谢! - Avitus
或者您可以将它们分开:例如。 StoppAttack : Vent - PhilHibbs


这适用于多个语句:

if condition1 Then stmt1:stmt2 Else if condition2 Then stmt3:stmt4 Else stmt5:stmt6

或者你可以将它分成多行:

if condition1 Then stmt1:stmt2
Else if condition2 Then stmt3:stmt4
Else stmt5:stmt6

-2
2018-04-30 20:08



请修改此答案的格式。 - CubeJockey