;Public Sub New() 

　　' 否则， 将不会在 

　　' COM 注册表中注册此类，且无法通过 

　　' CreateObject 创建此类。 

　　Public Sub New()Sub New() 

　　MyBase.New() 

　　End Sub 

　　Public Sub Northsnow()Sub Northsnow(ByVal ss As String) 

　　MsgBox(ss) 

　　End Sub 

　　End Class 

　　然后就可以编译，编译后，在ｐｂ中添加如下的代码来调用这个com 

　　int intValue 

　　oleobject objOle 

　　objOle=create OLEObject 

　　intValue=objOle.connecttonewobject("ClassLibrary1.ComC") 

　　objOLe.Northsnow("I am Northsnow") 

　　运行这个程序就会看到效果。 

　　我在C#中没有看到类似的com类. 

　　现在这个棘手的难题解决了之后，工作可以继续了。心理挺高兴的。但是在高兴之余又有一种奇怪的感觉。 

　　VS.net的确的很强。把很多复杂的东西都包装起来帮我们实现。我们在享受轻松的解决难题的时候，距离底层技术却越来越远。不知道是喜是悲。