_ Public Class ComClass1 #Region "COM GUID" ' 다음 GUID는 이 클래스의 COM ID와 COM 인터페이스를 ' 제공합니다. 이 GUID를 변경하면 기존 클라이언트가 해당 ' 클래스에 더 이상 액세스할 수 없게 됩니다. Public Const ClassId As String = "3bca23b6-03dd-4297-9a87-b3191a18bbfe" Public Const InterfaceId As String = "5d3ad84e-4482-4375-9533-bdf53e3eea19" Public Const EventsId As String = "4350b6b5-c68e-42d0-b361-7e49175ba99d" #End Region ' 생성 가능한 COM 클래스에는 매개 변수가 없는 Public Sub New()가 ' 포함되어 있어야 합니다. 그렇지 않으면 이 클래스가 ' COM 레지스트리에 등록되지 않으며 CreateObject를 ' 통해 이 클래스가 생성되지 않습니다. Public Sub New() MyBase.New() End Sub End Class