在 Visual Basic 中,可以使用 Action 属性来指定在 OLE 对象上执行的操作。Integer 型,可读写。
expression.Action
expression 必需。返回“Applies To”列表中的一个对象的表达式。
Action 属性使用以下设置:
常量 | 说明 |
---|---|
acOLECreateEmbed (0) | 创建嵌入对象。如果要使用该设置,首先必须将该控件的 OLETypeAllowed 属性设为 acOLEEmbedded 或 acOLEEither,再将 Class 属性设置为要创建的 OLE 对象的类型。可以使用 SourceDoc 属性使用已有的文件作为模板。 |
acOLECreateLink (1) | 由文件的内容创建链接的 OLE 对象。如果要使用该设置,首先必须设置控件的 OLETypeAllowed 和 SourceDoc 属性,再将 OLETypeAllowed 属性设置为 acOLELinked 或 acOLEEither。SourceDoc 属性指定用于创建 OLE 对象的文件。也可以设置控件的 SourceItem 属性(例如,如果创建的对象是 Microsoft Excel 电子表格,则设置属性来指定行与列的区域)。通过使用该设置来创建 OLE 对象时,控件将显示由控件的 SourceDoc 属性指定的图元文件的图像。如果保存 OLE 对象,则将只保存链接信息(如提供对象的应用程序的名称和链接文件的名称),因为控件只包含代表数据的图像但是没有包含源数据。 |
acOLECopy (4) | 将 OLE 对象复制到剪贴板。将 OLE 对象复制到剪贴板时,所有与此对象有关的数据和链接信息也都放置到了剪贴板上。可以将链接和嵌入的对象都复制到剪贴板上。使用该设置和单击“编辑”菜单中的“复制”命令是等效的。 |
acOLEPaste (5) | 从剪贴板上将数据粘贴到控件上。如果粘贴操作成功,控件的 OLEType 属性将被设置为 acOLELinked 或 acOLEEmbedded。如果粘贴操作失败,OLEType 属性将设为 acOLENone。使用 acOLEPaste 设置和单击“编辑”菜单中的“粘贴”命令是等效的。 |
acOLEUpdate (6) | 从提供对象的应用程序中检索当前数据,并将此数据作为控件中的图元文件图像来显示。 |
acOLEActivate (7) | 为操作(例如编辑)打开 OLE 对象。如果要使用此设置,首先必须设置控件的 Verb 属性。当 OLE 对象活动时,Verb 属性指定要执行的操作。 |
acOLEClose (9) | 关闭 OLE 对象,并终止和提供此对象的应用程序之间的连接。此设置仅适用于嵌入对象。使用此设置和单击此对象的控制菜单中的“关闭”命令是等效的。 |
acOLEDelete (10) | 删除指定的 OLE 对象并且释放相关内存。该设置可以直接删除 OLE 对象。当关闭窗体或当对象更新为新的对象时,将自动删除此对象。不能使用 Action 属性从 OLE 对象的基础表或基础查询中删除绑定 OLE 对象。 |
acOLEInsertObjDlg (14) | 显示“插入对象”对话框。在“窗体”视图或“数据表”视图中,显示此对话框可以使用户新建对象,以及链接或嵌入已有的对象。可以使用控件的 OLETypeAllowed 属性来确定用户使用此对话框所能创建的对象类型(用常量 acOLELinked、acOLEEmbedded 或 acOLEEither)。 |
acOLEPasteSpecialDlg (15) | 显示“选择性粘贴”对话框。在“窗体”视图或视图中使用此对话框,用户可以从剪贴板中粘贴对象。对话框提供一些选项,包含粘贴链接或嵌入的对象。可以使用控件的 OLETypeAllowed 属性来确定使用此对话框粘贴的对象类型(使用常量 acOLELinked、acOLEEmbedded 或 acOLEEither)。 |
acOLEFetchVerbs (17) | 更新 OLE 对象支持的操作列表。要显示操作列表,请使用 ObjectVerbs 和 ObjectVerbsCount 属性。 |
只能使用 Visual Basic 来设置 Action 属性。Action 属性设置值的数据类型为 Integer。
Action 属性在“设计”视图中不可用,但是能够在其他视图中读取或设置。
当控件的 Enabled 属性设为“否”或 Locked 属性设为“是”时,则某些 Action 属性设置不能使用。下表指出在这些条件下是否允许使用设置:
设置 | Enabled = 否 | Locked = 是 |
---|---|---|
acOLECreateEmbed (0) | 不允许 | 不允许 |
acOLECreateLink (1) | 不允许 | 不允许 |
acOLECopy (4) | 允许 | 允许 |
acOLEPaste (5) | 不允许 | 不允许 |
acOLEUpdate (6) | 不允许 | 不允许 |
acOLEActivate (7) | 允许 | 允许 |
acOLEClose (9) | 不允许 | 允许 |
acOLEDelete (10) | 不允许 | 不允许 |
acOLEInsertObjDlg (14) | 不允许 | 不允许 |
acOLEPasteSpecialDlg (15) | 不允许 | 不允许 |
acOLEFetchVerbs (17) | 不允许 | 允许 |