SetFieldApp

サブルーチン SetFieldApp は、フィールド名とそのプロパティをパラメータとして受け取り、フィールドにプロパティを割り当てます。

このサブルーチンは、フィールドの可視性、フィールドが必須かどうか、フィールドが表示されるべきページ（タブ）の番号、表示の順序（左から右、上から下）などのフィールドのプロパティを割り当てます。

ユーザ定義関数 FieldCust_AddDefect にサブルーチン SetFieldApp の呼び出しを追加します。この機能の詳細については、「FieldCust_AddDefect」を参照してください。

Sub SetFieldApp(FieldName, Vis, Req, PNo, VOrder)
    On Error Resume Next
    With Bug_Fields(FieldName)
        .IsVisible = Vis
        .IsRequired = Req
        .PageNo = PNo
        .ViewOrder = VOrder
    End With
    PrintError "SetFieldApp"
    On Error GoTo 0
End Sub