主题：sql 表合并

Dim dtb As New DataTableBuilder("统计")

MessageBox.Show(1)

dtb.AddDef("sys_user", Gettype(String), 32)

MessageBox.Show(2)

dtb.AddDef("年", Gettype(String),10)

MessageBox.Show(3)

dtb.AddDef("msy", Gettype(String),40)

MessageBox.Show(4)

dtb.AddDef("支出合计", Gettype(Double))

MessageBox.Show(5)

dtb.Build()

MessageBox.Show(6)

For Each nm() As String In dt2.GetValues("sys_user|年|msy")

MessageBox.Show(7)

    Dim dr As DataRow = DataTables("统计").AddNew()

MessageBox.Show(8)

     dr("sys_user") = nm(0)

MessageBox.Show(9)

     dr("年") = nm(1)

MessageBox.Show(10)

     dr("msy") = nm(2)

MessageBox.Show(11)

     Dim dr1 As DataRow = dt1.Find("sys_user='" & nm(0) & "' and 年='" & nm(1) & "'")

MessageBox.Show(12)

      If dr1 IsNot Nothing Then

MessageBox.Show(13)

      dr("支出合计") = dr1("支出合计")

MessageBox.Show(14)

      End If

MessageBox.Show(15)

Next

MainTable= Tables("统计")

MessageBox.Show(16)

.NET Framework 版本：2.0.50727.8000

Foxtable 版本：2014.11.11.1

错误所在事件：窗口,上市肉猪费用,Button1,Click

详细错误信息：

无法在 System.Int32 和 System.String 上执行“=”操作。