国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBS教程:在 VBScript 中使用對象

2020-06-26 18:03:06
字體:
來源:轉載
供稿:網友

在 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> 標記”信息。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 五寨县| 耒阳市| 永年县| 齐齐哈尔市| 无锡市| 新巴尔虎右旗| 庆元县| 龙里县| 茂名市| 建宁县| 黎平县| 黑水县| 旬邑县| 久治县| 云梦县| 宜君县| 乌恰县| 阳春市| 广昌县| 九龙城区| 古交市| 米易县| 新蔡县| 探索| 砀山县| 静海县| 镇平县| 遵义县| 本溪| 柳林县| 山西省| 延川县| 建始县| 应城市| 龙江县| 易门县| 乌审旗| 衡水市| 潮州市| 长宁县| 萨迦县|