我想向子窗體添加一條新記錄，但它總是向主窗體添加一條新記錄

我有以下代碼以將新記錄添加到子窗體，但由於某種原因它總是創建一條新記錄也是主要形式。我想向子窗體添加一條新記錄，但它總是向主窗體添加一條新記錄

基本上，我希望子表單向某個客戶添加詳細信息（客戶詳細信息顯示在主窗體中），子窗體顯示訂單，但我有一個下拉菜單選擇項目，然後將使用這些值將新記錄添加到子窗體。

我使用的代碼是：

With Forms![Student]![Selection subform1] 
![Module Code].SetFocus 
![Semester 1 Credits].SetFocus 
DoCmd.GoToRecord , , acNewRec 
![Module Code] = Sem1select1.Value 
![Semester 1 Credits] = Sem1sel1cred.Value 
End With

來源

2016-12-24 Vigmo10

使用記錄集：

Dim rs As DAO.Recordset 

With Me![Selection subform1].Form 
    Set rs = .RecordsetClone 
    rs.AddNew 
     rs![Module Code].Value = Sem1select1.Value 
     rs![Semester 1 Credits].Value = Sem1sel1cred.Value 
    rs.Update 
    ' Move to new record: 
    .Bookmark = rs.Bookmark 
    Set rs = Nothing 
End With

來源

2016-12-25 09:56:20 Gustav

我認爲這裏應該是'.Recordset'，不'.RecordsetClone'。 RecordsetClone也可以工作，但表單可能不會滾動到新記錄。 –

@SergeyS：是的，這可能是一個要求，所以我添加了一行設置_Bookmark_。 – Gustav

感謝你們的幫助。它就像一個魅力！ – Vigmo10

我想向子窗體添加一條新記錄，但它總是向主窗體添加一條新記錄

回答

相關問題