主题：如何自动比较数值后制动填入

Datacolchanged事件

Select Case e.DataCol.name
    Case "最高学历","在职学历","全日制学历"
        Dim xls() As String = {"本科", "大专", "高中"}
        For Each xl As String In xls
            If e.DataRow("在职学历") = xl OrElse e.DataRow("全日制学历") = xl Then
                e.DataRow("最高学历") = xl
                Exit For
            End If
        Next      
End Select