안내: COM 개체를 사용하여 상속 구현(Visual Basic)

이전 버전의 Visual Basic에서 만든 클래스도 COM 개체의 클래스에서 Public Visual Basic 클래스를 파생시킬 수 있습니다. COM 개체에서 상속된 클래스의 속성과 메서드는 다른 기본 클래스의 속성과 메서드를 재정의하거나 오버로드할 수 있는 것처럼 재정의하거나 오버로드할 수 있습니다. COM 개체의 상속은 다시 컴파일하지 않으려는 기존 클래스 라이브러리가 있는 경우에 유용합니다.

다음 절차에서는 Visual Basic 6.0을 사용하여 클래스가 포함된 COM 개체를 만든 다음 기본 클래스로 사용하는 방법을 보여 줍니다.

이 가이드에서 사용할 COM 개체를 빌드하려면

1. Visual Basic 6.0에서 새 ActiveX DLL 프로젝트를 엽니다. 이름이 지정된 Project1 프로젝트가 만들어집니다. 라는 Class1클래스가 있습니다.

2. 프로젝트 탐색기에서 Project1을 마우스 오른쪽 단추로 클릭한 다음 Project1 속성을 클릭합니다. 프로젝트 속성 대화 상자가 표시됩니다.

3. 프로젝트 속성 대화 상자의 일반 탭에서 프로젝트 이름 필드에 입력하여 ComObject1프로젝트 이름을 변경합니다.

4. 프로젝트 탐색기에서 마우스 오른쪽 단추를 클릭한 Class1다음 속성을 클릭합니다. 클래스의 속성 창이 표시됩니다.

5. Name 속성을 MathFunctions로 변경합니다.

6. 프로젝트 탐색기에서 마우스 오른쪽 단추를 클릭한 MathFunctions다음 코드 보기를 클릭합니다. 코드 편집기가 표시됩니다.

7. 속성 값을 저장할 지역 변수를 추가합니다.

   ' Local variable to hold property value
   Private mvarProp1 As Integer
   

8. 속성 Let 및 속성 Get 프로시저 추가:

   Public Property Let Prop1(ByVal vData As Integer)
      'Used when assigning a value to the property.
      mvarProp1 = vData
   End Property
   Public Property Get Prop1() As Integer
      'Used when retrieving a property's value.
      Prop1 = mvarProp1
   End Property
   

9. 함수를 추가합니다.

   Function AddNumbers(
      ByVal SomeNumber As Integer,
      ByVal AnotherNumber As Integer) As Integer
   
      AddNumbers = SomeNumber + AnotherNumber
   End Function
   

10. 파일 메뉴에서 ComObject1.dll만들기 를 클릭하여 COM 개체를 만들고 등록합니다.

    비고

    Visual Basic을 사용하여 만든 클래스를 COM 개체로 노출할 수도 있지만 실제 COM 개체는 아니며 이 연습에서는 사용할 수 없습니다. 자세한 내용은 .NET Framework 애플리케이션의 COM 상호 운용성을 참조하세요.

Interop 어셈블리

다음 절차에서는 관리되지 않는 코드(예: COM 개체)와 Visual Studio에서 사용하는 관리 코드 사이의 브리지 역할을 하는 interop 어셈블리를 만듭니다. Visual Basic에서 생성하는 interop 어셈블리는 매개 변수를 포장하고 반환값을 동일한 데이터 형식으로 변환하는 과정(즉, interop marshalling이라 불리는 과정)과 같이 COM 개체와의 상호 작용에 관련된 세부 정보를 처리합니다. Visual Basic 애플리케이션의 참조는 실제 COM 개체가 아닌 interop 어셈블리를 가리킵니다.

Visual Basic 2005 이상 버전에서 COM 개체를 사용하려면

1. 새 Visual Basic Windows 애플리케이션 프로젝트를 엽니다.

2. 프로젝트 메뉴에서 참조추가를 클릭합니다.

   참조 추가 대화 상자가 표시됩니다.

3. COM 탭에서 ComObject1 목록을 두 번 클릭하고 확인을 클릭합니다.

4. 프로젝트 메뉴에서 새 항목 추가클릭합니다.

   새 항목 추가 대화 상자가 표시됩니다.

5. 템플릿 창에서 클래스를 클릭합니다.

   기본 파일 이름( Class1.vb이름)이 이름 필드에 나타납니다. 이 필드를 MathClass.vb 변경하고 추가를 클릭합니다. 그러면 이름이 지정된 MathClass클래스가 만들어지고 해당 코드가 표시됩니다.

6. 다음 코드를 MathClass 상단에 추가하여 COM 클래스에서 상속받습니다.

   ' The inherited class is called MathFunctions in the base class,
   ' but the interop assembly appends the word Class to the name.
   Inherits ComObject1.MathFunctionsClass
   

7. 다음 코드를 추가하여 기본 클래스의 public 메서드를 오버로드합니다 MathClass.

   '  This method overloads the method AddNumbers from the base class.
   Overloads Function AddNumbers(
       ByVal SomeNumber As Integer,
       ByVal AnotherNumber As Integer) As Integer
   
       Return SomeNumber + AnotherNumber
   End Function
   

8. 다음 코드를 추가하여 상속된 클래스를 확장합니다 MathClass.

   '  The following function extends the inherited class.
   Function SubtractNumbers(
       ByVal SomeNumber As Integer,
       ByVal AnotherNumber As Integer) As Integer
   
       Return AnotherNumber - SomeNumber
   End Function
   

새 클래스는 COM 개체에서 기본 클래스의 속성을 상속하고, 메서드를 오버로드하고, 클래스를 확장할 새 메서드를 정의합니다.

상속된 클래스를 테스트하려면

1. 시작 폼에 단추를 추가한 다음 두 번 클릭하여 해당 코드를 봅니다.

2. 단추의 Click 이벤트 처리기 프로시저에서 다음 코드를 추가하여 오버로드된 메서드의 MathClass 인스턴스를 만들고 호출합니다.

   Dim Result1 As Short
   Dim Result2 As Integer
   Dim Result3 As Integer
   Dim MathObject As New MathClass
   Result1 = MathObject.AddNumbers(4S, 2S) ' Add two Shorts.
   Result2 = MathObject.AddNumbers(4, 2) 'Add two Integers.
   Result3 = MathObject.SubtractNumbers(2, 4) ' Subtract 2 from 4.
   MathObject.Prop1 = 6 ' Set an inherited property.
   
   MsgBox("Calling the AddNumbers method in the base class " &
          "using Short type numbers 4 and 2 = " & Result1)
   MsgBox("Calling the overloaded AddNumbers method using " &
          "Integer type numbers 4 and 2 = " & Result2)
   MsgBox("Calling the SubtractNumbers method " &
          "subtracting 2 from 4 = " & Result3)
   MsgBox("The value of the inherited property is " &
           MathObject.Prop1)
   

3. F5 키를 눌러 프로젝트를 실행합니다.

폼 AddNumbers 의 단추를 클릭하면 메서드가 먼저 데이터 형식 번호로 Short 호출되고 Visual Basic은 기본 클래스에서 적절한 메서드를 선택합니다. 두 번째 AddNumbers 호출은 MathClass의 오버로드 메서드로 전달됩니다. 세 번째 호출은 클래스를 SubtractNumbers 확장하는 메서드를 호출합니다. 기본 클래스의 속성이 설정되고 값이 표시됩니다.

다음 단계

오버로드된 AddNumbers 함수가 COM 개체의 기본 클래스에서 상속된 메서드와 동일한 데이터 형식을 갖는 것처럼 보일 수 있습니다. 이는 기본 클래스 메서드의 인수와 매개 변수가 Visual Basic 6.0에서 16비트 정수로 정의되지만 이후 버전의 Visual Basic에서 형식의 Short 16비트 정수로 노출되기 때문입니다. 새 함수는 32비트 정수와 기본 클래스 함수를 오버로드합니다.

COM 개체를 사용할 때 매개 변수의 크기 및 데이터 형식을 확인해야 합니다. 예를 들어 Visual Basic 6.0 컬렉션 개체를 인수로 허용하는 COM 개체를 사용하는 경우 이후 버전의 Visual Basic에서 컬렉션을 제공할 수 없습니다.

COM 클래스에서 상속된 속성 및 메서드를 재정의할 수 있습니다. 즉, 기본 COM 클래스에서 상속된 속성 또는 메서드를 대체하는 로컬 속성 또는 메서드를 선언할 수 있습니다. 상속된 COM 속성을 재정의하는 규칙은 다음 예외를 제외하고 다른 속성 및 메서드를 재정의하는 규칙과 유사합니다.

• COM 클래스에서 상속된 속성 또는 메서드를 재정의하는 경우 상속된 다른 모든 속성과 메서드를 재정의해야 합니다.

• 매개 변수를 사용하는 ByRef 속성은 재정의할 수 없습니다.

참고하십시오

• .NET Framework 애플리케이션의 COM 상호 운용성
• 상속 선언문
• 짧은 데이터 형식