Form.CurrentSectionTop プロパティ (Access)

このプロパティを使用して、現在のセクションの上端からフォームの上端までの距離を twips 単位で決定します。 値の取得および設定が可能です。整数型 (Integer) の値を使用します。

構文

式。CurrentSectionTop

expressionForm オブジェクトを表す変数です。

注釈

CurrentSectionTop プロパティの設定値は、フォームをスクロールするたびに変化します。

DefaultView プロパティが "単一フォーム" に設定されているフォームでは、ユーザーがセクションの左上隅までスクロールすると、プロパティ設定は負の値になります。

DefaultView プロパティが連続フォームに設定されているフォームでは、セクションが表示されない場合、CurrentSectionTop プロパティはフォームの InsideHeight プロパティと等しくなります。

CurrentSectionTop プロパティは、帳票フォームのフォーム ビューまたはデータシート ビューに表示される詳細セクションの位置を調べるときに便利です。 各 [詳細] セクションには、フォームのセクションの位置に従って、異なる CurrentSectionTop プロパティの設定値があります。

例

次の使用例では、帳票フォームに配置されたコントロールの CurrentSectionLeft プロパティおよび CurrentSectionTop プロパティの設定値を表示します。 新しいレコードに移動するたびに、カレント セクションのこれらのプロパティの値が、フォームのヘッダーに配置された lblStatus ラベルに表示されます。

Private Sub Form_Current() 
 
 Dim intCurTop As Integer 
 Dim intCurLeft As Integer 
 
 intCurTop = Me.CurrentSectionTop 
 intCurLeft = Me.CurrentSectionLeft 
 Me!lblStatus.Caption = intCurLeft & " , " & intCurTop 
 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。

  • Last updated on