上一篇文章我们给大家分享了连接运算符并且举了一些例子,那么这一篇文章我们将给大家分享一下VBA基本语法的条件判断IF语句程序。
VBA中的if程序语句可以解决很多的问题。
主要就是判断条件,当判断条件满足时才去执行对应的语句块,条件不满足是不会执行相对应的语句块的。
我这里面文字叙述的并不多,就是通过一些流程图和一些例子分享给大家。
举个现实的例子:我们在生活当中就会遇到这种情况,当我们有时间我们就去逛街,否则不去逛街这种结构。
那么我们对应的IF程序结果就是这样的。
If 条件 then
语句1
语句2
……
Else
语句1
语句2
……
End if
方便大家理解我就画个简单的流程控制图:

举个例子:
接下来要使用到的数据表格:


代码1:
Sub hh()
If Worksheets("sheet34").Cells(2, 3) >= 90 Then
Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(255, 0, 0)
Else
Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(0, 255, 0)
End If
End Sub
再举个现实的例子:
今天十点之前如果女朋友来,我就陪女朋友逛街,如果十点以后来就陪女朋友看电影,其他时间来那就直接去吃饭。
像这种结构和刚才的结构就是不一样的结构。
If 条件 then
语句1
语句2
……
ElseIf
语句1
语句2
……
Else
语句1
语句2
……
End if
方便理解我在再画个简单的流程控制图:

再举个例子:

代码2:
Sub hh()
If Worksheets("sheet34").Cells(2, 3) >= 90 Then
Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(255, 0, 0)
ElseIf Worksheets("sheet34").Cells(3, 3) <= 80 Then
Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(0, 255, 0)
Else
Worksheets("sheet34").Cells(2, 2).Interior.Color = RGB(0, 0, 255)
End If
End Sub
喜欢的请关注我,谢谢!
明天继续给大家分享其他的语法结构。