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