#146 TopMargin

"TopMargin/上余白" プロパティ

コントロールの上側境界線とコントロール内部の文字間の余白(上余白)を設定します。
VBAでこの値を設定する場合には、単位として「twip」で指定します。1cmは567twipです。

ラベル、テキストボックス

Private Sub fraProperty_AfterUpdate()
'[プロパティの設定]オプショングループの更新後処理

  With Me!txtData
    Select Case Me!fraProperty
      Case 1
        '上余白を200twipに
        .TopMargin = 200
      Case 2
        '上余白を800twipに
        .TopMargin = 800
      Case 3
        '上余白を0twipに
        .TopMargin = 0
    End Select
  End With

End Sub
  • テキストボックスの上余白を200twipに設定した場合
  • テキストボックスの上余白を800twipに設定した場合。テキストの上に大きな余白ができていますが、これは余白であり、改行しているわけではありません。
  • テキストボックスの上余白を0twipに設定した場合
| Index | Prev | Next |

 

Copyright © T'sWare All rights reserved