C#编写COM组件

1、新建一个类库项目
2、将Class1.cs改为我们想要的名字 问是否同时给类改名，确定
3、修改Properties目录下面的AssemblyInfo.cs ComVisible属性设置为True
4、项目菜单->MyLib属性 找到“生成”选项卡 往下看，找到“为 COM Interop 注册”勾上
5、继续往下，找到“签名”选项卡   勾上“为程序集签名”   在下面的下拉框里面选择“ <新建...>”
6、在弹出的对话框里面，输入MyLib。。或者随便取个名字   去掉使用密码保护文件的选项
7、开始编码，任何一个公开的类，必须有一个 I开通的接口定义

C# code

using System; using System.Collections.Generic; using System.Text; using System.Runtime.InteropServices; namespace MyLib { [ComVisible( true )] [Guid( " 2CBD3D76-35F1-4f9d-9C1B-9DBFEE412F76 " )] public interface IMyClass { void Initialize(); void Dispose(); int Add( int x, int y); } [ComVisible( true )] [Guid( " EA2F140A-108F-47ae-BBD5-83EEE646CC0D " )] [ProgId( " MyLib.MyClass " )] public class MyClass : IMyClass { public void Initialize() { // nothing todo } public void Dispose() { // nothing todo } public int Add( int x, int y) { return x + y; } } }

8、GUID属性里面的那个字符串，在“工具”菜单下面，“创建 GUID”   选择 Registry Format，然后复制  
注意在[Guid("....... 这个里面要去掉GUID前后的花括号
9、编译它 在命令提示符下面，进入Dll所在的目录 用 gacutil /i MyLib.dll 将这个DLL加入的全局缓存里 然后用 regasm MyLib.dll 注册这个dll
10、在VBScript里面试试。。。

HTML code

< script language ="VBScript" > Dim o : Set o=CreateObject("MyLib.MyClass") o.Initialize MsgBox " 1 + 2 = " & o.Add( 1 , 2 ) o.Dispose Set o = Nothing </ script >