主题：多个条件判断结果[求助]

Dim dr As DataRow = e.DataRow
If dr("年龄") >= 5 Then
    If dr("集中") >= 120 AndAlso dr("合计") >= 240 Then
        msgbox("合格")
    Else
        msgbox("不合格")
    End If
Else If dr("年龄") = 4 Then
    If dr("集中") >= 80 AndAlso dr("合计") >= 160 Then
        msgbox("合格")
    Else
        msgbox("不合格")
    End If
Else If dr("年龄") = 3 Then
    If dr("集中") >= 60 AndAlso dr("合计") >= 120 Then
        msgbox("合格")
    Else
        msgbox("不合格")
    End If
Else If dr("年龄") <= 2 Then
    If dr("集中") >= 120 AndAlso dr("合计") >= 240 Then
        msgbox("合格")
    Else
        msgbox("不合格")
    End If
End If