ينطبق على
عنصر BoundObjectFrame |
عنصر Image |
عنصر OptionButton |
عنصر Report |
عنصر CheckBox |
عنصر Label |
عنصر OptionGroup |
عنصر SubForm |
عنصر ComboBox |
عنصر Line |
عنصر Page |
مجموعة TabControl |
عنصر CommandButton |
عنصر ListBox |
عنصر PageBreak |
عنصر TextBox |
عنصر CustomControl |
عنصر ObjectFrame |
عنصر Rectangle |
عنصر ToggleButton |
يمكنك استخدام الخاصية "Top" لتعيين موقع أحد العناصر في نموذج أو تقرير. يوجد عدد صحيح للقراءة/الكتابة لجميع العناصر الموجودة في قائمة "ينطبق على" إلا عنصر "التقرير" المتاح للقراءة فقط.
التعبير Required. تعبير يقوم بإرجاع أحد العناصر المذكورة أعلاه.
ملاحظات
موقع عنصر تحكم هو المسافة المقاسة من حده الأيمن أو العلوي إلى الحافة اليمنى أو العلوية من المقطع الذي يحتوي على عنصر التحكم. يؤدي تعيين الخاصية Top إلى 0 إلى وضع حافة عنصر التحكم في الجزء العلوي من المقطع. لاستخدام وحدة قياس مختلفة عن الإعداد في مربع الحوار خيارات إقليمية في "لوحة تحكم Windows"، حدد الوحدة، مثل سم أو بوصة (على سبيل المثال، 3 سم أو 2 بوصة).
في Visual Basic، استخدم تعبير رقمي لتعيين قيمة هذه الخاصية. يتم التعبير عن القيم بالتويب.
بالنسبة لعناصر التحكم، يمكنك تعيين هذه الخاصية باستخدام صفحة الخصائص أو الماكرو أو التعليمات البرمجية لـ Visual Basic for Applications (VBA) الخاصة بعنصر تحكم.
عند نقل عنصر تحكم، يتم إدخال الإعداد الجديد للخاصية Top الخاصة بذلك العنصر تلقائياً في صفحة الخصائص. عند عرض نموذج أو تقرير في "معاينة قبل الطباعة" أو عند طباعة نموذج، يتم تحديد موقع عنصر تحكم بواسطة إعداد الخاصية Top الخاصة به إلى جانب إعدادات الهوامش للتقرير، المتوفرة عن طريق النقر فوق هوامشعلى علامة التبويب تخطيط الصفحة.
بالنسبة للتقارير، يكون إعداد الخاصية Top هو المقدار الذي تتم إزاحة المقطع الحالي منه من الجزء العلوي من الصفحة. يتم التعبير عن إعداد الخاصية هذا بالتويب. يمكنك استخدام هذه الخاصية لتحديد أي جزء من أسفل الصفحة تريد طباعة مقطع منه في إجراء حدث تنسيق المقطع.
مثال
يتحقق المثال التالي من إعداد الخاصية Top للتقرير الحالي. إذا كانت القيمة أقل من إعداد الحد الأدنى للهوامش، فسيتم تعيين خاصيتي NextRecord وPrintSection إلى False. لا يتقدم المقطع إلى السجل التالي، ولا تتم طباعة القسم التالي.
Sub Detail1_Format(Cancel As Integer, _
FormatCount As Integer)
Const conTopMargin = 1880
' Don't advance to next record or print next section
' if Top property setting is less than 1880 twips.
If Me.Top < conTopMargin Then
Me.NextRecord = False
Me.PrintSection = False
End If
End Sub