Свойство Image.SizeMode (Access)
Используйте свойство SizeMode , чтобы указать размер рисунка или другого объекта в кадре привязанного объекта, фрейме не связанного объекта или элементе управления изображением.
Синтаксис
expression. SizeMode
Выражение Переменная, представляющая объект Image .
Замечания
Свойство SizeMode использует следующие параметры.
Setting | Visual Basic | Описание |
---|---|---|
Клип | acOLESizeClip | (по умолчанию) Отображает объект фактического размера. Если объект больше элемента управления, его изображение обрезается справа и внизу границами элемента управления. |
Стрейч | acOLESizeStretch | Размер объекта для заполнения элемента управления. Этот параметр может искажать пропорции объекта. |
Масштабирование | acOLESizeZoom | Отображает весь объект, изменяя его по мере необходимости без искажения пропорций объекта. Этот параметр может оставить дополнительное место в элементе управления, если размер элемента управления изменен. |
Используйте параметр Клип для самого быстрого отображения. Используйте параметр Stretch для линейчатых и линейных графов, не беспокоясь о корректировке размера. Параметр Stretch может искажать круги и фотографии.
Пример
В следующем примере создается связанный объект OLE с помощью фрейма не связанного объекта с именем OLE1 и размер элемента управления для отображения всего содержимого объекта, когда пользователь нажимает кнопку команды.
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
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
https://aka.ms/ContentUserFeedback.
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделеОтправить и просмотреть отзыв по