注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

精品资源 仓库

不是精品,我不收藏——好资源 大家共享!

 
 
 

日志

 
 

1-12B、If条件判断小结  

2014-05-15 16:13:49|  分类: 【Excel VBA】 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

1-12BIf条件判断小结

1-12B、If条件判断小结 - zibo139 - 学习笔记——备忘录

1.单行形式1If...Then

If 条件判断 Then 条件成立结果

注意 在单行形式中,按照 If...Then 判断的结果也可以执行多条语句。

所有语句必须在同一行上并且以冒号分开。

 

例子:

Sub test()

If 1 > 10 Then a = a + 1: b = 1 + a: c = 1 + b

End Sub

2. 单行形式1If 条件判断 Then 条件成立 Else 条件不成立)

例子:

Sub test2()

If 1 > 1 Then MsgBox "yes" Else MsgBox "no"

End Sub

3.块形式(If...ThenEnd

If 条件判断 Then

条件成立结果

End If

 

例子:

Sub test3()

If 11 > 10 Then

a = 1 + a

b = 1 + a

c = 1 + b

End If

End Sub

4.块形式的If嵌套

If 条件判断 Then

成立时的结果

ElseIf 条件判断 Then

成立时的结果

……

Else

不成立时的结果

End If

 

例子:

Sub 等级判断()

    If Sheet1.Range("b1") >= 90 Then

        Sheet1.Range("b2") = ""

    ElseIf Sheet1.Range("b1") >= 80 Then

        Sheet1.Range("b2") = ""

    ElseIf Sheet1.Range("b1") >= 70 Then

        Sheet1.Range("b2") = ""

    Else

        Sheet1.Range("b2") = ""

    End If

End Sub

  

本文视频教程学习网址 http://www.51zxw.net/study.asp?vip=8662538

 

 

 

  评论这张
 
阅读(60)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017