主题：[求助]excel 模板

模板为

此主题相关图片如下：截图.bmp

代码为

Select Case e.Book.TempLate
    Case "员工履历表"
        Dim drs As List(Of DataRow) = e.DataRow.GetChildRows("学历信息")
        Dim i As Integer = 1
        Dim max As Integer = 3
        For Each dr As DataRow In drs
            If i >= max Then
                Exit For
            End If
            e.Book.Marks("学历" & i) = dr("学历")
            e.Book.Marks("毕业院校" & i) = dr("毕业院校")
            e.Book.Marks("专业" & i) = dr("专业")     
            i = i + 1
        Next
End Select

可能出现三个学历的情况

 
此主题相关图片如下：截图1.bmp

现在只要全日制和最高学历，有什么办法解决？