我们设计一个按钮,对A1单元格进行判断,如果只有两个情况,我们直接用IF一行代码即可以完成。
Private Sub CommandButton1_Click()
If [a1].Value = "男" Then MsgBox "帅哥" Else MsgBox "美女"
End Sub
当然也可以用IF块语句。
结构如下:
IF 条件式 Then
处理1
Else
处理2
End If
Private Sub CommandButton1_Click()
If [a1].Value = "男" Then
MsgBox "帅哥"
Else
MsgBox "美女"
End If
End Sub
此时,以上的代码,A1单元格如果输入是的男,显示为帅哥,如果输入的是“女”,显示的为“美女”。如果输入的是“人妖”,显示的还是“美女”。如果需要显示为“你输入有误”,我们可以使用以下嵌套的IF函数。
Private Sub CommandButton1_Click()
If [a1].Value = "男" Then
MsgBox "帅哥"
Else
If [a1].Value = "女" Then
MsgBox "美女"
Else
MsgBox "你输入有误"
End If
End If
End Sub
这样嵌套下去就比较麻烦。
可以使用以下列简洁的写法:
Private Sub CommandButton1_Click()
If [a1].Value = "男" Then
MsgBox "帅哥"
ElseIf [a1].vlaue = "女" Then
MsgBox "美女"
Else
MsgBox "您输入有误"
End If
End Sub
主要的结构如下:
IF 条件1 Then
满足条件1执行的操作
ElseI f 条件2 Then
满足条件2执行的操作
ElseI f 条件3 Then
满足条件3执行的操作
……
Else
除此之外做的事情
End If
子曰:用之则行,不用则藏。
意思是说,如果你用我的这些建议,就马上行动,知行合一,如果你不用,就赶紧收藏,以绝后患。
联系客服