主题：[求助]表事件

 这个你操作的失误有什么好说的？Ctrl+D就是会填充数据的，你按住，自然会不断填充。

 要不你就把代码写到DataColChanged事件去。

比如代码

Select Case e.DataCol.name
    Case "第一列","第二列"
        If e.DataRow.IsNull("Log") Then
            Dim cjbs As String = e.NewValue
            e.DataRow("Log") ="出勤标识;" & cjbs &  " _ " & Vars("sqldt")
        Else
            Dim s As String = e.DataRow("LOG")
            Dim cjbs As String = e.NewValue
            e.DataRow("Log") = s & vbcrlf & "出勤标识:" & cjbs &  " _ " & Vars("sqldt")
        End If
End Select