条件为True和Fase时分别运行某些语句 可以使用.Then.Ese语句定义两个可执行语句块: 条件为True时运行某一语句块,条件为 False时运行另 语句块 Sub AlertUser(value If value=0 Then AlertLabel. ForeColor= yb Red AlertLabel. Font Bold True AlertLabel. Font italic True Else AlertLabel. Forecolor= yb black AlertLabel. Font Bold False AlertLabel. Font italic False End if End sub 产东学技木取业学院条件为 True 和 False 时分别运行某些语句 可以使用 If...Then...Else 语句定义两个可执行语句块： 条件为 True 时运行某一语句块，条件为 False 时运行另一 语句块。 Sub AlertUser(value) If value = 0 Then AlertLabel.ForeColor = vbRed AlertLabel.Font.Bold = True AlertLabel.Font.Italic = True Else AlertLabel.Forecolor = vbBlack AlertLabel.Font.Bold = False AlertLabel.Font.Italic = False End If End Sub