请教专家赐教:
我在主窗体中建立了一个物料申请主表,一个物料申请明细表,二者以申请单号关联,Table绑定相应的表,为了不让人不小心修改到主表或关联表明细中的数值,这两表在主窗体中设置为不可编辑。 我是想通过一个模式窗体将来进行一个新的物料申请单的信息填写窗口,然后通过“提交”按钮代码将模式窗体中相关信息赋值给主窗体的主表和关联的物料申请明细表,但是在“提交”按钮运行存在一点问题,提示“不存在为名称为‘物料申请主表.物料申请明细表’的Datatable”,下面是提交大妈,请老师指教:
Dim sqbt As WinForm.TextBox = e.Form.Controls("申请标题")
If MessageBox.Show("确定提交此物料申请单?", "请确认" ,MessageBoxButtons.YesNo, MessageboxIcon.Question) = DialogResult.Yes
'------主窗体中的主表赋值-------
Tables("物料申请主表").current("申请标题")=sqbt.text '---将申请单的申请标题赋值给《物料申请主表》
'------将模式窗体中"物料申请表"中的物料信息赋值给主窗体中的关联表《物料申请主表.物料申请明细表》------
For Each dr As Row In Tables("物料申请表").Rows
Dim dr0 As DataRow = DataTables("物料申请主表.物料申请明细表").addnew
dr0("物料编号")=dr("物料编号")
dr0("物料名称")=dr("物料名称")
dr0("型号规格")=dr("型号规格")
dr0("供货厂商")=dr("供货厂商")
Next
End If
DataTables("物料申请主表").save
DataTables("物料申请主表.物料申请明细表").save