09-程序流程控制—>if语句的介绍

excel交流

1、if—then语句
　　这个句式相当于中文里面的“如果.......那么”。
　　格式：
　　　　if  逻辑表达式 then
                              语句块
             end if
   　解释：如果逻辑表达式的结果为true，则执行语句块里的所有语句，否则执行end if后面的语句。语句块可以是一句指令或多条指令，也可以调用一个或多个过程，当然，也可以为空，就是没有语句。
　　如：要判断A1单元格是否已输入内容，设计程序：

1. 
   
2. Sub test1()
   
3.   If [a1] = "" Then
   
4.       MsgBox "A1单元格没有输入任何内容！"
   
5.   End If
   
6. End Sub
   

复制代码

　2、 if—then—else语句　　
　　这个语句相当于中文里面的“如果......那么......否则......”句式。
　　格式：

　　　　if  逻辑表达式 then
                              语句块1
　　　　else
                              语句块2
              end if

       解释：如果逻辑表达式的结果为true，则执行语句块1里的所有语句，如果逻辑表达式的结果为Flase则执行语句块2里的所有语句。
　　如：要判断A1单元格是否已输入内容，设计程序：

1. 
   
2. Sub test2()
   
3.   If [a1] = "" Then
   
4.         MsgBox "A1单元格没有输入任何内容！"
   
5.   Else
   
6.         MsgBox "A1单元格已经输入了内容！"
   
7.   End If
   
8. End Sub
   

复制代码

　3、if—then—elseif语句
　　这就相当于中文里面的若“如果…那么…否则如果…那么…否则”语句，当然，可以有多句“否则如果.......”
　　格式：
　　　　If  逻辑表达式1 Then  
                              语句块1
                  ElseIf  逻辑表达式2  Then
                              语句块2
                  ElseIf  逻辑表达式3Then
                              语句块3
                   …
                 Else
                             语句块n
                 Eed If
　　解释：若逻辑表达式1的结果为True，则执行语句块1，接着继续执行EndIf后面的语句；若逻辑表达式1的结果为False，则检查逻辑表达式2的结果，若为True则执行语句块2，接着继续执行EndIf后面的语句.......一直到所有结果的条件都不满足时，才执行Else后面的语句块n。
　　如：要判断A1单元格的数是否能被2、3、5其中之一整除，设计程序：

1. 
   
2. Sub test3()
   
3.    If [a1] = "" Then
   
4.        MsgBox "A1单元格没有输入任何内容！"
   
5.    ElseIf [a1] Mod 2 = 0 Then
   
6.        MsgBox "A1单元格的数能被2整除！"
   
7.    ElseIf [a1] Mod 3 = 0 Then
   
8.        MsgBox "A1单元格的数能被3整除！"
   
9.    ElseIf [a1] Mod 5 = 0 Then
   
10.        MsgBox "A1单元格的数能被5整除！"
    
11.    Else
    
12.        MsgBox "A1单元格的数不能被2、3、5其中之一整除！"
    
13.    End If
    
14. End Sub
    

复制代码