vbscript:第十四课 在VBScript中使用对象



无论使用是 ActiveX? Control控件(以前称为 OLE Control控件)还是 Java? 对象Microsoft Visual Basic Scripting Edition 和 Microsoft? Internet Explorer 都以相同方式处理它们如果您使用是 Internet Explorer 并且 ActiveX 库中安装了这些Control控件就会看到由以下代码制作页面

<OBJECT> 标记用来包含对象<PARAM> 标记用来设置对象属性使用 <PARAM> 标记类似于在 Visual Basic 中设置窗体Control控件属性值例如以下代码使用 <OBJECT> 和 <PARAM> 标记将 ActiveX 标签Control控件添加到页面中:

<OBJECT
id=\"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>

象对任何窗体Control控件可以获取属性、设置属性和思路方法例如以下代码包含 <FORM> Control控件可用其对标签Control控件两个属性进行操作:

<FORM NAME=\"LabelControls\">
<INPUT TYPE=\"TEXT\" NAME=\"txtNewText\" SIZE=25>
<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.Value
End Sub
-->
</SCRIPT>

代码将对Control控件和值引用限定在窗体中这和简单验证举例中代码类似

ActiveX 库中有多个 ActiveX? Control控件可用于 Internet Explorer您可以在那里找到有关属性、思路方法和事件全部信息也可以在编程参考页面上找到有关Control控件类标识符 (CLSID) 信息另外还可以在 Internet Explorer 4.0 Author\'s Guide and HTML Reference 页面上找到有关 <OBJECT> 标记详细信息
-----------------------------------------------------------------------

注意 Internet Explorer 早期版本要求用大括号 ({}) 将 id 属性括起来不符合 W3C 规格在当前版本中使用大括号则会产生“此页使用了过期版本 <OBJECT> 标记”信息
Tags:  vbscript教程 vbscript.encode vbscript.dll vbscript

延伸阅读

最新评论

发表评论