DataTableBuilder异步的时候如何动态增加数据 Post By:2021/9/16 10:11:00 [显示全部帖子]
Dim
dtb As NewDataTableBuilder("表B") dtb.AddDef("姓名", Gettype(String), 32) For Each
v As String In
DataTables("表A").GetValues("课程") dtb.AddDef(v, Gettype(Double)) Next dtb.Build(ture)
For Each
v As String In
DataTables("表A").GetValues("姓名") Dim dr1 AsDataRow = DataTables("表B").AddNew() 此处提示不存在表B的DataTables。
dr1("姓名") = v ForEach dr2 AsDataRowInDataTables("表A").DataRows If dr2("姓名") = v Then
dr1(dr2("课程")) = dr2("分数") EndIf Next Next