欢迎登陆真网站,您的到来是我们的荣幸。 登陆 注册 忘记密码? ☆设为首页 △加入收藏
欢迎加入真幸福QQ群
电脑知识: 基础知识 网络技术 操作系统 办公软件 电脑维修 电脑安全 windows7 windows8 windows10 服务器教程 平板电脑 视频播放教程 网络应用 互联网 工具软件 浏览器教程 QQ技巧 输入法教程 影视制作 YY教程 wps教程 word教程 Excel教程 PowerPoint
云南西双版纳特产小花糯玉米真空包装


PasteSpecial Paste:粘贴参数
vba语句select case End Select
Linux Shell 文本处理工具集锦
CentOS6.5x86_64用yum安装git
HorizontalAlignment VerticalAlignment
vba do loop的几个例子
GetSaveAsFilename保存文件例子
VBA控制鼠标的操作范围
excel表格上如何批量修改行和列上的数据
如何更改Excel2007中的字号和字体
较为复杂的If ElseIf ElseIf EndIf语句
【 来源:网络 】【 点击:1 】 【 发布时间:2017_03_03 08:59:59 】

   不论是哪种语言,一般情况下,我们接触最多的就是if语句了,但是,比if语句更为复杂的是如下的语句:

  If…ElseIf…ElseIf…EndIf,当然,这种语句,可以无限制的添加各种条件,直到语句结束。因此,该语句,适合于条件多判定复杂的时候可使用。

  其语法如下:

  If 条件1 Then

  (条件1为True时 处理1)

  (条件1为True时 处理2)

  ElseIf 条件2 Then

  (条件2为True时 处理1)

  (条件2为True时 处理2)

  ElseIf 条件3 Then

  (条件3为True时 处理1)

  (条件3为True时 处理2)

  Else

  (以上条件均为False时 处理1)

  (以上条件均为False时 处理2)

  End If

  下面,再给出该语句的示例代码:

  Dim x As String

  x = "北京"

  If x = "南京" Then

  Range("A1").Value = "住南京"

  ElseIf x = "北京" Then

  Range("A1").Value = "住北京"

  ElseIf x = "文山" Then

  Range("A1").Value = "住文山"

  Else

  Range("A1").Value = "回广南老家住"

  End If

本网站由川南居提供技术支持,fkzxf版权所有 浙ICP备12031891号
淳安分站 淳安分站