主题：[求助]判断时间冲突的代码求助,10日更新问题

DataColChanging事件，判断一下

Dim fdr As DataRow = e.DataTable.Find("(结束时间 > #" & e.DataRow("开始时间") & "# or 开始时间 < #" & e.DataRow("结束时间") & "#) and 设备名 = '" & e.DataRow("设备名") & "'")

If fdr IsNot Nothing Then

    e.Cancel = True

End If