If User.Group = "财务" Or User.name = "开发者"
Dim name As String = CurrentTable.name
Select Case name
'---------------“按日期-piao号-原料汇总数量”插入到“日薪计算”
Case "按日期-piao号-原料汇总数量"
Dim drc As Row
For Each dr As Row In Tables(name).rows
drc = Tables("日薪计算").AddNew()
drc("零件代号") = dr("原材料")
drc("零件名称") = dr("生产piao号")
drc("总数量") = dr("数量")
Next
MessageBox.show("从按日期-piao号-原料汇总数量插入到日薪计算-操作完成!")
MainTable = Tables("日薪计算")
End Select
End If
“按日期-piao号-原料汇总数量”这个数据表是根据“数据统计->分组统计”里面设置的方法操作得出来的，而上面的代码是放在通过“管理项目->菜单设计”设计出来的一个按钮之Click事件里面的，我想将“按日期-piao号-原料汇总数量”里面的数据通过按钮就插入到“日薪计算”这个表里面去。但是操作起来是无效的。为什么呢？
加好友 
发短信
Post By：2018/12/19 13:38:00 [显示全部帖子]
