欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

Microsoft® Visual Basic® Scripting Edition
CreateObject 函數(shù)

描述

創(chuàng)建并返回對(duì) Automation 對(duì)象的引用。

語法

CreateObject(class)
class 參數(shù)使用語法 servername.typename，有以下部分：

部分描述

servername 提供對(duì)象的應(yīng)用程序名稱。

typename 要?jiǎng)?chuàng)建的對(duì)象類型或類。

說明

Automation 服務(wù)器至少提供一種對(duì)象類型。例如，字處理應(yīng)用程序可以提供應(yīng)用程序?qū)ο�、文檔對(duì)象和工具條對(duì)象。
要?jiǎng)?chuàng)建 Automation 對(duì)象，將 CreateObject 函數(shù)返回的對(duì)象賦值給某對(duì)象變量：
Dim ExcelSheet
Set ExcelSheet = CreateObject("Excel.Sheet")
上述代碼啟動(dòng)創(chuàng)建對(duì)象（在此實(shí)例中，是 Microsoft Excel 電子表格）的應(yīng)用程序。對(duì)象創(chuàng)建后，就可以在代碼中使用定義的對(duì)象變量引用此對(duì)象。在下面的樣例中，可使用對(duì)象變量、ExcelSheet 和其他 Excel 對(duì)象，包括 Application 對(duì)象和 Cells 集合訪問新對(duì)象的屬性和方法。例如：
' 通過 Application 對(duì)象使 Excel 可見。
ExcelSheet.Application.Visible = True
' 在工作表的第一個(gè)單元中放置文本。
ExcelSheet.Cells(1,1).Value = "這是 A 列第一行"
' 保存工作表。
ExcelSheet.SaveAs "C:\DOCS\TEST.XLS"
' 在 Application 對(duì)象中使用 Quit 方法退出 Excel。
ExcelSheet.Application.Quit
' 釋放對(duì)象變量。
Set ExcelSheet = Nothing

^{<button id="ehq01"></button>}

部分	描述
servername	提供對(duì)象的應(yīng)用程序名稱。
typename	要?jiǎng)?chuàng)建的對(duì)象類型或類。