참조를 반복하여 Microsoft Access에서 해당 속성을 보는 방법

원본 KB 번호: 209849

요약

도구 메뉴에서 참조 대화 상자가 있는 참조 위치를 보면 대화 상자의 제한 사항으로 인해 경로 이름의 후행 부분이 잘리게 될 수 있습니다. 이 문서에서는 Visual Basic for Applications 프로시저를 사용하여 References 컬렉션을 반복하고 각 참조의 속성을 검색하는 방법을 보여 줍니다.

Microsoft에서 제공하는 프로그래밍 예제는 예시를 위한 것일 뿐이며 이와 관련하여 명시적이거나 묵시적인 어떠한 보증도 하지 않습니다. 이는 상품성이나 특정 목적에 대한 적합성의 묵시적인 보증을 포함하며 이에 제한되지 않습니다. 이 문서에서는 예제에 사용되고 있는 프로그래밍 언어와 프로시저를 만들고 디버깅하는 데 사용되는 도구를 사용자가 잘 알고 있는 것으로 가정합니다. Microsoft 지원 엔지니어는 사용자에게 도움이 되도록 특정 프로시저에 대한 기능을 설명할 수 있지만 사용자의 특정 요구 사항에 맞도록 예제를 수정하여 추가 기능을 제공하거나 프로시저를 구성하지는 않습니다.

추가 정보

References 컬렉션을 반복하고 각 참조의 속성을 검색하려면 다음 단계를 수행합니다.

1. 모듈을 만들고 선언 섹션에 아직 없는 경우 다음 줄을 입력 합니다 .

   Option Explicit
   

2. 다음 절차를 입력합니다.

   Function ReferenceInfo()
   
       Dim strMessage  As String
       Dim strTitle    As String
       Dim refItem     As Reference
   
       On Error Resume Next
   
       For Each refItem In References
           If refItem.IsBroken Then
               strMessage = "Missing Reference:" & vbCrLf & refItem.FullPath
           Else
               strMessage = "Reference: " & refItem.Name & vbCrLf _
                          & "Location: " & refItem.FullPath & vbCrLf
           End If
           Debug.Print strMessage
       Next refItem
   
   End Function
   

3. 이 함수를 테스트하려면 직접 실행 창에 다음 줄을 입력한 다음 Enter 키를 누릅니다.

   ? ReferenceInfo
   

   참고

   각 참조는 직접 실행 창에 나열됩니다.

참조

References 컬렉션에 대한 자세한 내용은 Visual Basic 편집기 도움말 메뉴에서 Microsoft Visual Basic 도움말을 클릭하고 Office 도우미 또는 응답 마법사에 참조 개체를 입력한 다음 검색을 클릭하여 항목을 확인합니다.

For Each...를 사용하여 References 컬렉션을 열거하는 방법에 대한 자세한 내용은 다음 명령문의 Visual Basic 편집기 도움말 메뉴에서 Microsoft Visual Basic 도움말을 클릭하고 Office 도우미 또는 응답 마법사에서 다음을 입력한 다음 검색을 클릭하여 항목을 봅니다.