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

Microsoft® Visual Basic® Scripting Edition
CreateObject 函數(shù) 		語言參考
版本 2

請參閱

描述
創(chuàng)建并返回對 Automation 對象的引用。
語法
CreateObject(class)

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

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

說明
Automation 服務(wù)器至少提供一種對象類型。例如，字處理應(yīng)用程序可以提供應(yīng)用程序?qū)ο�、文檔對象和工具條對象。

要創(chuàng)建 Automation 對象，將 CreateObject 函數(shù)返回的對象賦值給某對象變量： 

Dim ExcelSheet
Set ExcelSheet = CreateObject("Excel.Sheet")
上述代碼啟動創(chuàng)建對象（在此實例中，是 Microsoft Excel 電子表格）的應(yīng)用程序。對象創(chuàng)建后，就可以在代碼中使用定義的對象變量引用此對象。在下面的樣例中，可使用對象變量、ExcelSheet 和其他 Excel 對象，包括 Application 對象和 Cells 集合訪問新對象的屬性和方法。例如：

' 通過 Application 對象使 Excel 可見。
ExcelSheet.Application.Visible = True
' 在工作表的第一個單元中放置文本。
ExcelSheet.Cells(1,1).Value = "這是 A 列第一行"
' 保存工作表。
ExcelSheet.SaveAs "C:\DOCS\TEST.XLS"
' 在 Application 對象中使用 Quit 方法退出 Excel。
ExcelSheet.Application.Quit
' 釋放對象變量。
Set ExcelSheet = Nothing