主题：[求助]多条件自动录入

Select Case e.DataCol.Name
    Case "设计任务要求_城市","设计任务要求_项目名称","设计任务要求_项目地址"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("设计任务要求_项目地址") = False Then
            If dr("设计任务要求_项目地址") Like "广场*" AndAlso  dr("设计任务要求_城市") = "中山" AndAlso dr("设计任务要求_项目名称") = "项目1" Then
                dr("项目信息_项目总") ="小王"
            End If
        End If
End Select