Access VBA教程:SizeMode属性

使用 SizeMode属性可以指定如何调整绑定对象框、未绑定对象框或图像控件中的图片或其他对象的大小。

expression.SizeMode

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

说明

SizeMode属性使用以下设置:

设置 Visual Basic 说明
剪裁 acOLESizeClip   (默认值)以对象的实际大小进行显示。如果对象的大小超出控件的大小,控件边框会在控件的右边界和下边界剪裁对象。
拉伸 acOLESizeStretch   调整对象的大小以适合控件的大小。该设置可能会破坏对象的正常比例。
缩放 acOLESizeZoom   显示整个对象,并根据需要调整对象大小但不扭曲对象的比例。如果调整控件的大小,该设置可能会在控件中留下额外的空间。

可以在属性表中或者使用Visual Basic对 SizeMode属性进行设置。在 Visual Basic 中可以使用控件的默认控件样式或DefaultControl方法对该属性的默认值进行设置。

提示   将该属性设为“剪裁”时显示速度是最快的。对于条形图和折线图则可以设为“拉伸”而不必关心大小调整,不过设为“拉伸”可能会破坏圆和照片的比例。

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教程:ShowNavigationButtons属性(快照查看器) 下页:Access VBA教程:SnapshotPath属性(快照查看器)

Access VBA教程:SizeMode属性

Access VBA教程:SnapshotPath属性(快照查看器) Access VBA教程:SortOrder属性
Access VBA教程:Source属性 Access VBA教程:SourceConnectStr、SourceDatabase属性
Access VBA教程:SourceDoc属性 Access VBA教程:SourceItem属性
Access VBA教程:SourceObject属性 Access VBA教程:SpecialEffect属性
Access VBA教程:StartupForm属性 Access VBA教程:StartupMenuBar属性
Access VBA教程:StartupShortcutMenuBar属性 Access VBA教程:StartupShowDBWindow属性
Access VBA教程:StartupShowStatusBar属性 Access VBA教程:StatusBarText属性
Access VBA教程:Style属性 Access VBA教程:SubAddress属性
Access VBA教程:SubdatasheetExpanded属性 Access VBA教程:SubdatasheetHeight属性
Access VBA教程:SubdatasheetName属性 Access VBA教程:TabFixedHeight属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号