COM互操作 - 在VB 脚本里面使用.NET类型-阿里云开发者社区

开发者社区> 开发与运维> 正文

COM互操作 - 在VB 脚本里面使用.NET类型

简介:

请看下面这段VBS代码:

Set obj = CreateObject("System.Collections.ArrayList")

obj.Add("this is a test")

obj.Add(1)

obj.Add(obj)

 

Msgbox obj(0)

Msgbox obj(1)

Msgbox obj(2).ToString()

 

代码里面试图创建一个ArrayList.NET对象,然后添加了几个不同类型的对象在这个ArrayList里面,最后显示结果。为什么我们可以在VBS里面使用.NET里面的内建类型呢?这是因为.NET安装好了以后,在注册表里面将所有COM可见的类型都注册过了,打开注册表编辑器,你会看到SYSTEM_CLASS_ROOT下面有很多以System.开头的progid,这些progidCLSIDInprocServer都是mscoree.dll,也就是说在VB script脚本里面的CreateObject对象调用时,COM库通过mscoree.dll加载CLR,然后创建System.Collections.ArrayList对象并最终返回给VB Script程序。

 

Msgbox obj(1)也有玄机,要知道,在ArrayList里面只能保存Object类型的数据,也就是说但是obj.Add(1)调用完毕以后,ArrayList第二个元素是一个object类型,那么为什么Msgbox obj(1)却能够正确显示1呢?Object类型里面有好几个函数,例如EqualsGetHashCode,为什么其他的函数不调用,而偏偏调用ToString函数呢?这是因为.NETToString函数的DISPID设置为零了,在COM里面,DISPID0的函数为默认的调用函数。

本文转自 donjuan 博客园博客,原文链接:  http://www.cnblogs.com/killmyday/archive/2009/02/20/1394468.html ,如需转载请自行联系原作者

版权声明:本文内容由阿里云实名注册用户自发贡献,版权归原作者所有,阿里云开发者社区不拥有其著作权,亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容,填写侵权投诉表单进行举报,一经查实,本社区将立刻删除涉嫌侵权内容。

分享:
开发与运维
使用钉钉扫一扫加入圈子
+ 订阅

集结各类场景实战经验,助你开发运维畅行无忧

其他文章