LCField の ClearVirtualCode メソッド

このメソッドは、フィールドに指定されている仮想コードをクリアします。仮想コードは、別のシステムによって認識される特別なシステムプロパティとしてフィールドにフラグを付けるものです。コネクションごとにサポートされる固有のコードについては、Connector のドキュメントを参照してください。

定義位置

LCField

構文

Call field.ClearVirtualCode (code)

パラメータ

パラメータ	説明
code	クリアするコード。ゼロ (0) を指定すると、すべてのコードがクリアされます。

例

Option Public
Uselsx "*lsxlc"  
Sub Initialize
  Dim session As New LCSession 
     ' In an LEI Scripted Agent, use the following syntax instead:
     ' Dim session As New LCSession ("mySession")
  Dim field As New LCField (LCTYPE_INT)
  Dim Code As Long
  Dim text As String
  Call session.ListConnector (LCLIST_FIRST, , Code)
  Call field.SetVirtualCode (Code)
  While session.ListConnector (LCLIST_NEXT, , Code)
    Call field.SetVirtualCode (Code)
  Wend
  ' use the value to clear an individual connector's virtual code
  ' use 'zero' to clear all connectors' virtual codes
  Call field.ClearVirtualcode (0)
  Print "All of the virtual codes have been cleared."
End Sub

出力例

All of the virtual codes have been cleared.