在 VBScript 中使用對(duì)象
使用對(duì)象
無論使用的是 ActiveX(R) 控件（以前稱為 OLE 控件）還是 Java(TM) 對(duì)象，Microsoft Visual Basic Scripting Edition 和 Microsoft(R) Internet Explorer 都以相同的方式處理它們。如果您使用的是 Internet Explorer 并且安裝了 Label 控件，就會(huì)看到由以下代碼制作的頁面。
<OBJECT> 標(biāo)記用來包含對(duì)象，<PARAM> 標(biāo)記用來設(shè)置對(duì)象屬性的初始值。如果您是 Visual Basic 程序員，您會(huì)發(fā)現(xiàn)使用 <PARAM> 標(biāo)記類似于在 Visual Basic 中設(shè)置窗體控件的初始屬性值。例如，以下代碼使用 <OBJECT> 和 <PARAM> 標(biāo)記將 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="一個(gè)簡(jiǎn)單標(biāo)簽">
<PARAM NAME="FontName" VALUE="宋體">
<PARAM NAME="FontSize" VALUE="20">
<PARAM NAME="FontBold" VALUE="1">
<PARAM NAME="FrColor" VALUE="0">
</OBJECT>
象對(duì)任何窗體控件一樣，可以獲取屬性、設(shè)置屬性和調(diào)用方法。例如，以下代碼包含 <FORM> 控件，可用其對(duì)標(biāo)簽控件的兩個(gè)屬性進(jìn)行操作：
<FORM NAME="LabelControls">
<INPUT TYPE="TEXT" NAME="txtNewText" class=’9v’5>
<INPUT TYPE="BUTTON" NAME="cmdChangeIt" VALUE="更改文本">
<INPUT TYPE="BUTTON" NAME="cmdRotate" VALUE="旋轉(zhuǎn)標(biāo)簽">
</FORM>
通過定義過的窗體，cmdChangeIt 按鈕的事件過程可更改標(biāo)簽文本：
<SCRIPT LANGUAGE="VBScript">
<!--
Sub cmdChangeIt_onClick
Dim TheForm
Set TheForm = Document.LabelControls
lblActiveLbl.Caption = TheForm.txtNewText.Value
End Sub
-->
</SCRIPT>
代碼將對(duì)控件和值的引用限定在窗體中，這與簡(jiǎn)單驗(yàn)證示例中的代碼類似。
多個(gè) ActiveX 控件可用于 Internet Explorer。您可以在 Microsoft(R) Web 站點(diǎn)上 (http://www.microsoft.com) 找到關(guān)于屬性、方法和事件以及控件類名標(biāo)識(shí)符（CLSID）的全部信息。另外還可以在 Internet Explorer 4.0 Author’s Guide and HTML Reference頁面上找到有關(guān) <OBJECT> 標(biāo)記的詳細(xì)信息。
在 VBScript 中使用對(duì)象
本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)
點(diǎn)擊舉報(bào)。
