Form.CurrentSectionTop プロパティ (Access)

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

構文

式。CurrentSectionTop

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

注釈

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

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

DefaultView プロパティが Continuous Forms に設定されているフォームの場合、セクションが表示されない場合、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 のサポートおよびフィードバックを参照してください。