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
详细错误信息:
调用的目标发生了异常。
表达式包含无效的日期常量“##”。