ActiveX Controls Guide (v11)

GetNext (ActiveX メソッド)

適用対象

VAccess

説明

現在のインデックス パスの次のレコードを取得し、Pervasive PSQL ステータス コードを整数値で返します。

構文

object.GetNext [vLockBias] 

GetNext メソッドの構文は次のような要素で構成されます。

要素
説明
object
必須。object プレースホルダーは、[適用対象]のオブジェクトを評価するオブジェクト式を表します。
vLockBias
省略可能。レコードを取得する際にセットするレコード ロックの種類を表す値です。デフォルトは 0 で、ロックなしです。次のいずれかの定数を指定できます。
Const BTO_SingleNoWait = 200
Const BTO_MultiNoWait = 400

備考

このメソッドは、IndexNumber プロパティによって設定された、現在選択されているインデックス パスの次のレコードを、そのコントロールに関連付けられたファイルから取得します。

このメソッドを呼び出す前に、インデックス パスに現在の位置を確立しておく必要があります。

オペレーションのステータス コードはこのメソッドから返され、コントロールの Status プロパティに設定されます。ステータスがゼロの場合は正常に実行されたことを示します。ステータス コード 9 は、現在のインデックス パスの現在のレコードには後続レコードがないことを示します。ステータス コード 8 は、そのメソッドを呼び出す前に、現在のレコード上に位置が確立されていなかったことを示します。

'日付が 1 年以上古いレコードをすべて削除する 
Customers.IndexNumber = 0    '顧客番号 
Customers.GetFirst 
Do 
   If DateDiff("yyyy", Now, _  
    Customers.FieldValue("last_order_date")) > 0 
      Customers.Delete 
   End If 
      Customers.GetNext 
Loop While Customers.Status = 0 

GetLessOrEqual (ActiveX メソッド)

GetNextExtended (ActiveX メソッド)