Dim Dic As new Dictionary(of DataRow, Integer)
Dim v As Double
For Each dr As DataRow In DataTables("表A").DataRows
v = DataTables("表A").Compute("Count(第二列 )", "第二列 = " & dr("第一列"))
dic.Add(dr, v)
Next
For Each dr As DataRow In dic.Keys
dr("第四列") = dic(dr)
Next
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2019.12.17.18
错误所在事件:窗口,窗口2,Button1,Click
详细错误信息:
语法错误:“=”运算符后缺少操作数。