次の方法で共有


Height、Width、Left、Top、ClientHeight、ClientWidth、ClientLeft、ClientTop プロパティ、TabStrip、Image コントロールの例

次の使用例は、ユーザーが CommandButton をクリックしたときに、Image のサイズを TabStrip クライアント領域のサイズに設定します。

このコード サンプルでは、 Height and WidthLeft と TopClientHeight、ClientLeft、ClientTop、ClientWidth の各プロパティを使用します。

この例を使用するには、以下のサンプル コードをフォームの宣言部分にコピーします。 フォームに次が含まれていることを確認してください。

  • CommandButton1 という名前のコマンド ボタン
  • TabStrip1 という名前のタブ ストリップ
  • 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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。