主题：为什么我所绑定的表作为副本项选择不了做为副本

Select e.DataCol.Name
    Case "雇员", "代号"
        If e.DataRow.IsNull("雇员") OrElse e.DataRow.IsNull("代号")  Then
            e.DataRow("同雇员同代号编号") = Nothing
        Else
            Dim lb As String = e.DataRow("雇员") & e.DataRow("代号")
            If e.DataRow("同雇员同代号编号").StartsWith(lb) = False    '如果单据编号前缀不符
                Dim max As String
                Dim idx As Integer
                max = e.DataTable.Compute("Max(同雇员同代号编号)","雇员 = '" & e.DataRow("雇员") & "' And 代号 = '" & e.DataRow("代号") & "' And [_Identify] <> " & e.DataRow("_Identify"))     '取得该类别的最大编号
                If max > "" Then '如果存在最大编号
                  idx = CInt((StrReverse( StrReverse(max).Substring(0,4))) .Substring(0)) + 1 '将获得的最大编号的后四位顺序号加1
                    Else
                    idx = 1 '否则顺序号等于1
                End If
                e.DataRow("同雇员同代号编号") = lb & Format(idx,"0000")  '设编号为4位
            End If
        End If
End Select