UserFormメソッド/コントロールの配置

Short DefineLabel(BSTR title)

titleで指定された文字をもつラベルを定義します。

引数

title
表示する文字列を指定します。

戻り値

コントロール番号が返されます。

備考

Valueプロパティを設定することでプログラム的に表示内容を変更することもできます。

サンプル

Option Explicit
Dim obj: Set obj = CreateObject("SeraphyScriptDialog")
Dim frm: Set frm = obj.CreateForm()
frm.DefineLabel "本日の日付:"
Dim lbl2: lbl2 = frm.DefineLabel("")
frm.Value(lbl2) = FormatDateTime(Now, vbLongDate)
frm.Enable(lbl2) = False
frm.ExecuteForm()

例: ラベルの例