보고서에서 선택한 텍스트 상자의 텍스트를 가져 오는 방법은 무엇입니까? VBA

Question

액세스 테이블 (tblCourses)에서 가져온 Course 이름을 포함하는 170 개의 TextBoxes가 포함 된 보고서 (rptCourses)가 있습니다. 사용자가 코스 이름 텍스트 상자 중 하나를 클릭하면 폼 (frmRateCourse)은로드 된 TextBox (txtboxCourseTitle), 본질적으로 헤더로, 선택한 리포트 텍스트 상자의 코스 이름을 포함하는 것이 이상적입니다.

내 질문은 : 선택한 보고서 텍스트 상자에서 텍스트를 가져 와서 해당 텍스트를로드 된 양식의 텍스트 상자에 어떻게 입력 할 수 있습니까?

이 질문이 이미 존재한다면 사과드립니다. 어떤 도움을 주셔서 감사드립니다.

Answer 1

가장 쉬운 방법은 문자열을 OpenArgs으로 전달하는 것입니다.

Private Sub CourseName_Click() 
    DoCmd.OpenForm "frmRateCourse", OpenArgs:=Me.CourseName.Value 
End Sub 

및 frmRateCourse에

:

Private Sub Form_Open(Cancel As Integer) 
    Me.lbTitle.Caption = Nz(Me.OpenArgs, "<no Title>") 
End Sub