VB6 사용자 컨트롤 내에서 함수 참조하기

Question

VB6 프로젝트 내에서 만든 사용자 컨트롤의 공용 프로 시저를 참조하는 데 문제가 있습니다.

Option Explicit 

Private Sub Command1_Click() 
    UserControl1.updateMessage ("TIME NOW: " & DateTime.Time) 
End Sub 

사용자 정의 컨트롤 코드는 다음과 같다 :

이

Option Explicit 

Public Sub updateMessage(ByVal newMessage As String) 
    Label1.Caption = newMessage 
End Sub 

이 EXE 컴파일 및 작품

간단한 예 (EXE), 나는 버튼과 사용자 컨트롤과 양식을 가지고 괜찮아요. 그리고 폼에 updateMessage를 입력 할 때 적절한 요구 사항이있는 인텔리 센스 목록에 나타납니다. 내가 가진 문제는 사용자 정의 컨트롤 내에서 코드의 적절한 섹션으로 이동하는 대신 updateMessage의 "정의로 이동"을 원할 때 메시지가 항상 다음과 같이 반환됩니다.

"Can not jump to ' 현재 참조되지 않은 라이브러리 'Unknown1'에 있기 때문에 updateMessage '

"Unkown1"의 번호가 매겨진 접미사가 수시로 변경됩니다.

이 절차에 대한 참조가 없다면 인텔리 센스에 나타나지 않고 프로젝트가 컴파일되지 않아야합니다. MZTools에서이 플러그인을 실행하면 (이 플러그인이 설치되어 있는지 여부에 관계없이 오류가 표시되지만) updateMessage 프로 시저로 이동하여이 함수를 호출하는 모든 프로 시저를 찾을 수 있으므로 두 함수 사이의 링크가 있어야합니다. MZTools가 텍스트 매칭 패턴을 사용하여 찾은 것인지 확실하지 않습니다.)

이 문제에 대해 밝히는 사람이 있다면 매우 좋을 것입니다.이 불쌍한 VB6 개발자는 많은 번거 로움을 피하십시오!

VB6을 SP6 (빌드 9782)으로 설치하고 HP dx2400에서 XP SP3을 실행하고 있습니다.

Answer 1

예, 이것은 매우 성가신 일이며, VB6에서는 버그라고 확신합니다. 개체 브라우저에서 updateMessage 메서드를 찾아 두 번 클릭하면 정의가 나타납니다. 따라서 컴파일러는 실제로 을 사용하여에 정의가 있는지 알 수 있습니다. Shift + F2 키를 누르면 해당 위치로 이동할 수 없습니다.