求助，vb中if如何在5个条件中满足任意三个条件，然后then。。。最后5个条件都满足，then。。。如果if不行，其他的可以么

bz=0
if   条件1 then bz=bz+1
if  条件2 then bz=bz+1
if  条件3 then bz=bz+1
if  条件4 then bz=bz+1
if  条件5 then bz=bz+1
if bz=5 then
if bz>=3 then
 

如果5条件则*
如果3条件则*
不是则*

If A = "条件1" And B = "条件2" And C = "条件3" And D = "条件4" And E = "条件5" Then
    MsgBox "满足了五个条件！"
ElseIf A = "条件1" And B = "条件2" And C = "条件3" And D = "条件4" Then
    MsgBox "满足了四个条件！"
ElseIf A = "条件1" And B = "条件2" And C = "条件3" Then
    MsgBox "满足了三个条件！"
Else
    MsgBox "三个条件都满足不了！"
End If

其中A、B、C、D、E是你需要判断的控件、对象、变量等。

最搞笑的代码

dim bz as integer
dim sql as string
bz=0   
if   条件1 then bz=bz+1:sql="条件1"
if  条件2 then bz=bz+1：sql=sql+"条件2"
if  条件3 then bz=bz+1：sql=sql+"条件3"
if  条件4 then bz=bz+1：sql=sql+"条件4"
if  条件5 then bz=bz+1：sql=sql+"条件5"

if bz=3 then *
if bz=5 then *

支持楼2，学习ING

没啥问题吧，最起码保证结果正确。