主题：代码问题求助？

If e.DataRow("鉴定等级") = "技师" Then
    If e.DataRow("申报性质") = "正常申报" AndAlso e.DataRow("资格审核") = True AndAlso e.DataRow("实操潜能") = True Then
        e.DataRow("理论收费") = 50 And e.DataRow("实操收费") = 80 And e.DataRow("潜能收费") = 80
        If e.DataRow("申报性质") = "补考两项" AndAlso e.DataRow("资格审核") = True Then
            e.DataRow("理论收费") = 0 And e.DataRow("实操收费") = 80 And e.DataRow("潜能收费") = 80
            If e.DataRow("申报性质") = "补考实操" AndAlso e.DataRow("资格审核") = True Then
                e.DataRow("理论收费") = 0 And e.DataRow("实操收费") = 80 And e.DataRow("潜能收费") = 0
                If e.DataRow("申报性质") = "补考潜能" AndAlso e.DataRow("资格审核") = True Then
                    e.DataRow("理论收费") = 0 And e.DataRow("实操收费") = 0 And e.DataRow("潜能收费") = 80
                   
                End If
            End If
        End If
    End If
End If

 

版主：这段代码的错误在哪？我的目的是－－－1、当“申报性质”为正常申报 且“资格审核”为通过 且“实操潜能”为“有”时，理论收费为50、实操收费为80、潜能收费为80

                                                           2、当“申报性质”为正常申报 且“资格审核”为通过 且“实操潜能”为“无”时，理论收费为50、实操收费为0、潜能收费为0 

                                                           3、当“申报性质”为补考两项 且“资格审核”为通过 理论收费为0、实操收费为80、潜能收费为80  

                                                           4、当“申报性质”为补考实操 且“资格审核”为通过 理论收费为0、实操收费为80、潜能收费为0

                                                           5、当“申报性质”为补考潜能 且“资格审核”为通过 理论收费为0、实操收费为0、潜能收费为80

我组合了很多组代码，但都没有反应，请指教？

 一点进步也没有

 

If e.DataRow("鉴定等级") = "技师" Then
    If e.DataRow("申报性质") = "正常申报" AndAlso e.DataRow("资格审核") = True AndAlso e.DataRow("实操潜能") = True Then
        e.DataRow("理论收费") = 50 

       e.DataRow("实操收费") = 80 

       e.DataRow("潜能收费") = 80
    Else If 其它条件  Then

 

    Else If 其它条件 Then

 

    End If

End If

版主明鉴！我在写代码的时候基本上是以搭积木的思维方式写，可能还是理解能力太差，所以写的代码没有几次是成功的，还要多多学习！