Access VBA教程:Class属性

使用 Class属性可以指定或确定嵌入的OLE对象的类名。String 型,可读/写。

expression.Class

expression   必需。返回“Applies To”列表中的一个对象的表达式。

设置

Class属性设置是在创建或粘贴 OLE对象时,由用户或 Microsoft Access 提供的字符串表达式。

使用控件的属性表Visual Basic,可以设置 Class属性。

说明

类名定义的是 OLE对象的类型。例如,Microsoft Excel 支持好几种类型的 OLE对象,包括工作表和图表。其类名分别为“Excel.Sheet”和“Excel.Chart”。当在“设计”视图中创建 OLE对象(通过单击“编辑”菜单上的“选择性粘贴”或“插入”菜单上的“对象”)时,Microsoft Access 将在属性表中输入新对象的类名。

注意  若要确定 OLE对象的类名,请参阅提供对象的应用程序的文档。

当从“剪贴板”复制对象时,“类名”属性设置将进行更新。例如,如果将 Microsoft Excel 图表从“剪贴板”粘贴到原来含有 Microsoft Excel 工作表的 OLE对象中,则 Class属性设置会从“Excel.Sheet”改为“Excel.Chart”。通过使用 Visual Basic 将控件的Action 属性设为 acOLEPaste 或 acOLEPasteSpecialDlg,可以从“剪贴板”粘贴对象。

注意  OLEClass属性与 Class属性相似但并不等效。OLEClass属性设置是 OLE对象的一般说明,而 Class属性设置则是在 Visual Basic 中用于引用 OLE对象的名称。OLEClass属性设置的示例是“Microsoft Excel 图表”、“Microsoft Word 文档”及“画笔图片”。

VBA示例

以下示例使用名为OLE1 的非绑定对象框创建一个链接的 OLE对象,当用户单击命令按钮时,调整控件大小以显示对象的所有内容。


Sub Command1_Click
    OLE1.Class = "Excel.Sheet"    ' Set class name.
    ' Specify type of object.
    OLE1.OLETypeAllowed = acOLELinked
    ' Specify source file.
    OLE1.SourceDoc = "C:\Excel\Oletext.xls"
    ' Specify data to create link to.
    OLE1.SourceItem = "R1C1:R5C5"
    ' Create linked object.
    OLE1.Action = acOLECreateLink
    ' Adjust control size.
    OLE1.SizeMode = acOLESizeZoom
End Sub

上页:Access VBA教程:CheckIfOfficeIsHTMLEditor属性 下页:Access VBA教程:CloseButton属性

Access VBA教程:Class属性

Access VBA教程:CloseButton属性 Access VBA教程:CodeContextObject属性
Access VBA教程:CodeData属性 Access VBA教程:CodeProject属性
Access VBA教程:Collection属性 Access VBA教程:ColorMode属性
Access VBA教程:Column属性 Access VBA教程:ColumnCount属性
Access VBA教程:ColumnHeadings属性 Access VBA教程:ColumnHeads属性
Access VBA教程:ColumnHidden属性 Access VBA教程:ColumnOrder属性
Access VBA教程:ColumnSpacing属性 Access VBA教程:ColumnWidth属性
Access VBA教程:ColumnWidths属性 Access VBA教程:COMAddIns属性
Access VBA教程:CommandBars属性 Access VBA教程:CommandBeforeExecute属性
Access VBA教程:CommandChecked属性 Access VBA教程:CommandEnabled属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号