2012-12-26 66 views
2

我想通過按鈕單擊將ComboBox中的名稱從一種表單傳遞給另一種表單,而我似乎無法使其工作。我不習慣使用MS Access,我相信它是一個簡單的答案。這是我到目前爲止有:將變量從一種表單傳遞到另一種表單

表格A:

Private Sub Command104_Click() 
On Error GoTo Err_Command104_Click 

    Dim stDocName As String 
    Dim stLinkCriteria As String 

    stDocName = "Vol_Hrs" 
    DoCmd.OpenForm stDocName, , , stLinkCriteria 
    Forms.Vol_Hours.Search.Value = Me.Combo94.Column(0) 

Exit_Command104_Click: 
    Exit Sub 

Err_Command104_Click: 
    MsgBox Err.Description 
    Resume Exit_Command104_Click 

End Sub 

表格B:

Private Sub cmdAddNew_Click() 
On Error GoTo Err_cmdAddNew_Click 

    Dim stDocName As String 
    Dim stLinkCriteria As String 

    DoCmd.Close 

    stDocName = "frmLookupScreen" 
    DoCmd.OpenForm stDocName, , , stLinkCriteria 
    Forms.frmLookupScreen.Combo94.Value = Me.Search.Column(0) 

Exit_cmdAddNew_Click: 
    Exit Sub 

Err_cmdAddNew_Click: 
    MsgBox Err.Description 
    Resume Exit_cmdAddNew_Click 

End Sub 
+0

Froms是你實際代碼中的拼寫錯誤嗎?如果是這樣,它應該是'Forms'(圍繞'o'和'r'切換)。 – mellamokb

+0

對不起,這是一個錯字 – user1902540

+0

是我得到的錯誤如下\t A到B \t對象該屬性或方法不支持 \t \t B到A \t表達您輸入referes一個對象,它是封閉的犯規存在 – user1902540

回答

0

當引用一個對象,即文本框中使用。

Forms!FormName!ObjectName.ObjectProperty = "Testing" 

訪問方法時使用此。

Forms!FormName.Form.Method. 

話雖如此。當我使用表單之間的信息來拉取調用表單名稱時,我發現它更容易。然後,我可以在那裏訪問幾乎所有呼叫表單上的信息。如果需要更新組合或列表框,更改文本,重新查詢等,我還可以將數據推回調用表單。

Private Sub Form_Load() 

    Set frmPrevious = Screen.ActiveForm 

    Me.tbText.value = frmPrevious.cbPassTest.value 

End Sub 

將該代碼放在您調用的窗體的LOAD()中,然後您可以將所需的窗體拉出來。

相關問題