| ラベルを使ってフォームに直線を引く |
|---|
ラベルのBorderStyleプロパティとHeightプロパティを使って、
フォームに直線が引かれているように表示する事ができます。
BorderStyleプロパティは、コントロールまたはフォームの境界線のスタイルを
設定します。実線の境界線を表示するためには、定数:fmBorderStyleSingle
を設定します。
Heightプロパティは、オブジェクトの高さまたは幅をポイント単位で指定します。
サンプルでは、フォームが読み込まれたあとで、表示される前に発生するイベント
「Initialize」でラベルのプロパティの設定をしています。
フォームにラベル「Label1」を配置してください。
Private Sub UserForm_Initialize()
Label1.BorderStyle = fmBorderStyleSingle
Label1.Height = 1
End Sub
|
| Excel97 |