vb 多条件的if语句 如何实现如果满足条件1,条件2,条件3,条件4,条件5时.执行A 我用if语句,不能连用an比如if(( 条件1 and 条件2) and (条件3 and 条件4 ))and 条件5 then A 系统显示缺少如果用嵌套if .应该怎么用?另外二维数组也显示i找不到,附上程序Public Function jinji(xD2() As Double,xr1() As Double,xD1() As Double,xL1ef() As Double,xail() As Double) As Byte()Dim i As IntegerDim j As IntegerDim p As IntegerFor j = 0 To 9 ' (省略了step=1)For i = 0 To 9If(( xD2(j)=jinjibiao[i][0] and xr1(j)=jinjibiao[i][1]) and ( xD1(j)=jinjibiao[i][2] and xL1ef(j)=jinjibiao[i][3] ))and xail(j)=jinjibiao[i][4] thenExit ForEnd IfNext jp = 1 Elsep = 0 Byte(j)=pEnd IfNext iEnd Function
网友回答
【答案】 1.楼主你看一下哈,你上面有两个end if,可是只有一个if,肯定不匹配,对不对?
2.这个程序里面i的for语句循环是在j 的后面,说明i是嵌套在j循环的里面,可是楼主下面却是先next j,再 next i,这又是矛盾了吧?
3.程序里面的 else 是跟哪个if 匹配的?整个程序当中只有一个if,可是你却在else之前就end if了···这也不对吧?
还望楼主自己再修改、调试下哈,我这没有vb,也不能帮你调试~程序写出来就是要调试的,希望能帮到楼主~