主题：求助

 Select Case e.DataCol.Name
    Case "分"
        
        If e.NewValue = 6 Then
            e.DataRow("评定等级") = "一"
            e.DataRow("思想分") = 55
            e.DataRow("政治分") = 51
            e.datarow("备注") =
        End If
        If e.NewValue = 5 Then
            e.DataRow("评定等级") = "二"
            e.DataRow("思想分") = 55
            e.DataRow("政治分") = 50
        End If
        If e.NewValue = 4 Then
            e.DataRow("评定等级") = "三"
            e.DataRow("思想分") = 55
            e.DataRow("政治分") = 49
        End If
        If e.NewValue = 3 Then
            e.DataRow("评定等级") = "四"
            e.DataRow("思想分") = 55
            e.DataRow("政治分") = 48
        End If
        If e.NewValue = 2 Then
            e.DataRow("评定等级") = "五"
            e.DataRow("思想分") = 55
            e.DataRow("政治分") = 47
        End If
        
        If e.NewValue = 1 Then
            e.DataRow("评定等级") = "六"
            e.DataRow("思想分") = 55
            e.DataRow("政治分") = 46
        End If
        If e.NewValue = 0 Then
            
            e.DataRow("思想分") = 55
            e.DataRow("政治分") = 45
            e.DataRow("评定等级") = "不评定"
        End If
狐狸爸爸 我想问 根据等级一共是6个等级  那么有6个集合 一等集合有 “做袖子、行棉、坐蔸”等  二等“案板、熨衣服”等  3 4 5 6等都是类似这样的集合
如何让上边的e.datarow("备注") = 自动在一等集合里循环赋值  就是例如一等集合 那么第一个一等的备注就是“做袖子” 第二个一等的就是“行棉”
以此类推