主题：[求助]表与控件之间生成求指导

参考

Dim t1 As Table = Tables("学生表")
Dim t2 As Table = Tables("学费表")
DataTables("收费任务").datarows.clear
For Each r1 As Row In t1.Rows
    For Each r2 As Row In t2.Rows
        Dim ndr = DataTables("收费任务").addnew
        ndr("学生编码") = r1("学生编号")
        ndr("收费名称") = r2("学费名称")
    Next
Next