Bewerken

Delen via

Height, Width, Left, Top, ClientHeight, ClientWidth, ClientLeft, ClientTop properties, TabStrip, Image control example

  • Artikel

The following example sets the dimensions of an Image to the size of a TabStrip client area when the user clicks a CommandButton.

This code sample uses the following properties: Height and Width, Left and Top, and ClientHeight, ClientLeft, ClientTop, and ClientWidth.

To use this example, copy this sample code to the Declarations portion of a form. Make sure that the form contains:

  • A CommandButton named CommandButton1.
  • A TabStrip named TabStrip1.
  • An Image named Image1.
Private Sub UserForm_Initialize() 
 CommandButton1.Caption = "Size Image to Tab Area" 
 CommandButton1.WordWrap = True 
 CommandButton1.AutoSize = True 
End Sub

Private Sub CommandButton1_Click() 
 Image1.ZOrder(fmFront) 
'Place Image in front of TabStrip 
 
'ClientLeft and ClientTop are measured from the edge 
'of the TabStrip, not from the edges of the form 
'containing the TabStrip. 
 Image1.Left = TabStrip1.Left + TabStrip1.ClientLeft 
 Image1.Top = TabStrip1.Top + TabStrip1.ClientTop 
 Image1.Width = TabStrip1.ClientWidth 
 Image1.Height = TabStrip1.ClientHeight 
 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.