Table of contents
TOC
Réduire la table des matières
Développer la table des matières

Image.ImageHeight, propriété (accès)Image.ImageHeight Property (Access)

office 365 dev account|Dernière mise à jour: 14/03/2018
|
2 Collaborateurs

Vous pouvez utiliser la propriété ImageHeight pour déterminer la hauteur en twips de l’image dans un contrôle image. En lecture/écriture longue.You can use the ImageHeight property to determine the height in twips of the picture in an image control. Read/write Long.

SyntaxeSyntax

expression. ImageHeightexpression. ImageHeight

expression Variable qui représente un objet Image .expression A variable that represents an Image object.

RemarquesRemarks

Cette propriété est en lecture seule dans tous les modes.This property is read-only in all views.

Vous pouvez utiliser la propriété ImageHeight en même temps que la propriété ImageWidth pour déterminer la taille d’une image dans un contrôle image. Vous utilisez ensuite cette information pour modifier les propriétés de hauteur et la largeur du contrôle d’image à la taille de l’image affichée.You can use the ImageHeight property together with the ImageWidth property to determine the size of a picture in an image control. You could then use this information to change the image control's Height and Width properties to match the size of the picture displayed.

ExempleExample

L’exemple suivant invite l’utilisateur à entrer le nom d’un bitmap, puis assigne cette image bitmap à la propriété image du contrôle d’image Image1. Les propriétés ImageHeight et ImageWidth permettent de redimensionner le contrôle d’image pour l’ajuster à la taille de l’image bitmap.The following example prompts the user to enter the name of a bitmap and then assigns that bitmap to the Picture property of the Image1 image control. The ImageHeight and ImageWidth properties are used to resize the image control to fit the size of the bitmap.

Sub GetNewPicture(frm As Form) 
    Dim ctlImage As Control 
    Set ctlImage = frm!Image1 
    ctlImage.Picture = InputBox("Enter path and " _ 
        &; "file name for new bitmap") 
    ctlImage.Height = ctlImage.ImageHeight 
    ctlImage.Width = ctlImage.ImageWidth 
End Sub

Voir aussiSee also

ConceptsConcepts

Objet imageImage Object

© 2018 Microsoft