Question

我有一个完美的表格（Vendor_Update）。形式很简单-一个未绑定的组合框（cbo_Vendor）用于过滤4个文本框以进行编辑。该表格绑定到tbl_Vendors。 cbo_Vendor的OnChange事件上使用了一个宏，以在tbl_Vendors中搜索选定的记录。我可以编辑文本框，然后按预期将它们保存到表中。我想通过单击数据库中另一个表单（Form_Start）上的按钮来打开Vendor_Update表单。我在VBA中使用以下代码在开始表单中添加了Cmd_Vendor_Data：

Private Sub Cmd_Vendor_Data_Click()
  DoCmd.OpenForm "Vendor_Update", acNormal, "", "", acFormAdd
End Sub

将打开表单，我可以从组合框中选择一个供应商，但文本框中不会填充tbl_Vendors中的信息。

为什么Vendor_Update表单仅在我打开时起作用，而在单击事件中打开却不能起作用？

Vendor_Update表单的另一条注释-此代码在On Load事件中：

Private Sub Form_Load()
  If Not Me.NewRecord Then RunCommand acCmdRecordsGoToNew
  Me.Cbo_Vendor.Requery  
End Sub

我不精通VBA，因此非常感谢您的帮助！

Answer 1

感谢@HansUp的协助！代码已更正，并且表格按预期工作。

ToUpper()

访问表单不显示有关单击事件的记录

1 个答案: