我在窗口的菜单按钮里做一个增加单据按钮,这样写窗口中的表为空表了,可表头上的控件不为空,依然是原来的数据,就算这样写,也是把已保存的控件数值改为空,自动生成的凭证号变成1,这样不符合添加单据要求,我想在不关闭窗口基础上在单据窗口菜单中添加新单,不是不断串改已保存单据控件数据。
此主题相关图片如下:0609.png
图中没有设窗口表头控件上的变量为空,新添的单据把财务数据源表里的转账数据全自动改为控件上的最新数据,全乱了!我看过帮助及视频教程中的单据录入,它介绍通过关联表录入数据保存到表上,但关联表不用保存已直接录入后台数据,这与实现需要保存、审核流程不符,因此单据录入还是要通过窗口的动态表录入后保存到表上。Select Case e.StripItem.Name
Case "新增凭证" '保存代
e.Form.Controls("ComboBox3").Value = Nothing
e.Form.Controls("dh").Value = Nothing
e.Form.Controls("dh1").Value = Nothing
e.Form.Controls("rq").Value = Nothing
e.Form.Controls("TextBox1").Value = Nothing
e.Form.Controls("TextBox2").Value = Nothing
Tables("收款凭证_Table1").AddNew
Tables("收款凭证_Table1").Filter = "[凭证号] Is Null"
For i As Integer = Tables("收款凭证_Table1").Rows.count - 1 To 0 Step -1
Tables("收款凭证_Table1").Rows(i).Delete
Next
Tables("收款凭证_Table1").AddNew(10)
End Select
[此贴子已经被作者于2021/6/9 13:36:01编辑过]