VBS教程：在 VBScript 中使用对象

在 vbscript 中使用对象

使用对象

无论使用的是 activex(r) 控件（以前称为 ole 控件）还是 java(tm) 对象，microsoft visual basic scripting edition 和 microsoft(r) internet explorer 都以相同的方式处理它们。如果您使用的是 internet explorer 并且安装了 label 控件，就会看到由以下代码制作的页面。

<object> 标记用来包含对象，<param> 标记用来设置对象属性的初始值。如果您是 visual basic 程序员，您会发现使用 <param> 标记类似于在 visual basic 中设置窗体控件的初始属性值。例如，以下代码使用 <object> 和 <param> 标记将 activex label 控件添加到页面中：

<object   classid="clsid:99b42120-6ec7-11cf-a6c7-00aa00a47dd2"   id=lblactivelbl   width=250   height=250   align=left   hspace=20   vspace=0><param name="angle" value="90"><param name="alignment" value="4"><param name="backstyle" value="0"><param name="caption" value="一个简单标签"><param name="fontname" value="宋体"><param name="fontsize" value="20"><param name="fontbold" value="1"><param name="frcolor" value="0"></object>

象对任何窗体控件一样，可以获取属性、设置属性和调用方法。例如，以下代码包含 <form> 控件，可用其对标签控件的两个属性进行操作：

<form name="labelcontrols"><input type="text" name="txtnewtext" class='9v'5><input type="button" name="cmdchangeit" value="更改文本"><input type="button" name="cmdrotate" value="旋转标签"></form>

通过定义过的窗体，cmdchangeit 按钮的事件过程可更改标签文本：

<script language="vbscript"><!--sub cmdchangeit_onclick   dim theform   set theform = document.labelcontrols   lblactivelbl.caption = theform.txtnewtext.valueend sub--></script>

代码将对控件和值的引用限定在窗体中，这与简单验证示例中的代码类似。

多个 activex 控件可用于 internet explorer。您可以在 microsoft(r) web 站点上 (http://www.microsoft.com) 找到关于属性、方法和事件以及控件类名标识符（clsid）的全部信息。另外还可以在 internet explorer 4.0 author's guide and html reference页面上找到有关 <object> 标记的详细信息。

注意   internet explorer 的早期版本要求用大括号 ({}) 将 classid 属性括起来，不符合 w3c 规格。在当前版本中使用大括号则会产生“此页使用了过期版本的 <object> 标记”信息。