Ms access 如何在MS Access中的窗体中插入自定义(运行时)值

Ms access 如何在MS Access中的窗体中插入自定义(运行时)值,ms-access,Ms Access,我在Microsoft Access中有两个表 1包含列的销售 产品和产品价格 2包含列的存储 产品、价格和数量 我已经创建了一个针对销售表的表单 我希望当我在product列中输入产品名称时,它会自动从STOCKS表中获取我输入的产品的价格 我可能需要输入10种产品的名称,并加上每种产品的价格,以获得我正在制作的销售点系统的总销售价值 如何做到这一点 谢谢假设productField和priceField是表单中的字段,则必须将此代码添加到productField的on exit事件中 如果未

我在Microsoft Access中有两个表

1包含列的销售

产品和产品价格

2包含列的存储

产品、价格和数量

我已经创建了一个针对销售表的表单

我希望当我在product列中输入产品名称时,它会自动从STOCKS表中获取我输入的产品的价格

我可能需要输入10种产品的名称,并加上每种产品的价格,以获得我正在制作的销售点系统的总销售价值

如何做到这一点

谢谢

假设productField和priceField是表单中的字段,则必须将此代码添加到productField的on exit事件中

如果未更改产品,则退出“如果用户未编辑产品” Dim recSet作为记录集 Set recSet=CurrentDb.OpenRecordsetSelect stock.price from stock where stock.product=&Me.productField.Value 如果没有recSet.EOF,则“如果产品存在 Me.priceField=recSet.Fields0 其他的 '执行默认操作 如果结束 podChanged=false“重置产品编辑状态”
您必须将全局布尔变量prodChanged initialized声明为false,并在OnChange of productField中将其设置为true

上传一个小数据库,我们可以在其中看到您所做的操作,怎么样?那么,我们对您针对SALES表创建的表单了解多少?现在只想澄清一件事:为什么SALES表包含Price列?这是否意味着产品的销售价格可能与库存表中记录的产品价格不同?我不会使用退出事件,这将意味着在表单中使用Tab键将更新销售,可能会违反用户的要求。此外,问题不是指表格,而是指表格。根据评论,除非销售的产品可以有不同的价格,否则整个问题都违反了规范化规则。我还想问一下表单从哪里获取产品数据?一个组合似乎是最好的选择,如果这是明智地基于库存,价格可以是组合中的一个隐藏列。。。。。。这意味着可以通过引用该列轻松地将价格写入文本框。你的答案似乎是交替使用控件和字段,除非我误解了。问题不太清楚,但他想从股票表中获得价格值。我编辑了代码来实现这一点