打开具有ID MS Access的表单

时间:2014-07-05 19:23:36

标签: forms vba ms-access-2010

我已经阅读了一些解决此问题的主题,但我仍然遇到错误,表单会打开一个空白记录。

我的设置是我有一个"联系人文件"表格,显示来自"主联系人数据库的个人的一般联系信息"表。在此表单的底部,我有一个子窗体,显示该个人的案例信息,并允许用户创建新案例。这些信息正确地存储在"案例文件信息"表I已在Access中创建。

然而,当我尝试打开"案例文件信息"表单,"联系人文件"上的按钮和文本字段形式,它会带来一个空白记录。我尝试过使用MS Access'内置"按钮"创建工具以创建宏以及以下VBA:

Private Sub Command112_Click()
DoCmd.OpenForm "Casefile Information", , , "CASEID = " & Me.Text98
End Sub

我也试过这种方法:

Private Sub Command112_Click()
Dim RecordID As Integer
RecordID = Me.Text98
DoCmd.OpenForm "Casefile Information", , , "CASEID = " & RecordID
End Sub
  • Text98是"联系人文件"上的文本框。形成。
  • CASEID是8个数字字符,该表的主键,用户输入但不允许重复。
  • 上面的第二个示例在RecordID = Me.Text98行上返回错误(6)。

无论出于何种原因,数据库中有一条记录可以正常工作,但该联系人没有其他联系人和其他案例文件也无法正确加载。

谢谢!

2 个答案:

答案 0 :(得分:0)

您必须确保将Casefile Information表单设置为Data Entry =否,否则它将一直显示为空白。见link

至于您收到的错误,您可能会遇到一些数据类型未匹配或overflow

答案 1 :(得分:0)

我设置组合框以从Casefile Information数据库中提取值,并使用编码按钮从组合框中提取存储的值,并根据该值打开表单(通常命名为combobox113)。在该组合框中,我显示了第1列(CASEID)和第2列(SHORT_DESC),但是将值绑定到第1列,以便它将携带CASEID值来打开表单。

这是一项工作,但暂时完成了工作。