主题：[求助]两表数据同步的问题

Select Case e.DataCol.name
    Case "日期"
      Dim dr As DataRow = DataTables("压缩集团气源取气表").Find("日期 = #" & e.OldValue & "#")
       If dr Is Nothing Then
         dr = DataTables("压缩集团气源取气表").AddNew()
         dr("日期") = e.DataRow("日期")
         dr("晋东_省天然气_日累计") = e.DataRow("白泉天然气购入量")
         dr("晋东_晋煤蓝焰_日累计") = e.DataRow("蓝焰煤层气购入量")
        Else
        dr("日期") = e.DataRow("日期")
        End If
      Case "白泉天然气购入量","蓝焰煤层气购入量"
     Dim dr As DataRow = DataTables("压缩集团气源取气表").Find("日期 = #" & e.DataRow("日期") & "#")
       If dr IsNot Nothing Then
       dr("晋东_省天然气_日累计") = e.DataRow("白泉天然气购入量")
       dr("晋东_晋煤蓝焰_日累计") = e.DataRow("蓝焰煤层气购入量")
      End If
End Select

提示下列错误！！怎么办？

.NET Framework 版本：2.0.50727.8766
Foxtable 版本：2017.12.31.1
错误所在事件：表，晋东公司生产日报，DataColChanged
详细错误信息：
调用的目标发生了异常。
表达式包含无效的日期常量“##”。