นำไปใช้กับ
วัตถุ BoundObjectFrame |
วัตถุ Image |
วัตถุ OptionButton |
วัตถุ Report |
วัตถุ CheckBox |
วัตถุ Label |
วัตถุ OptionGroup |
วัตถุ SubForm |
วัตถุ ComboBox |
วัตถุ Line |
วัตถุ Page |
คอลเลกชัน TabControl |
วัตถุ CommandButton |
วัตถุ ListBox |
วัตถุ PageBreak |
วัตถุ TextBox |
วัตถุ CustomControl |
วัตถุ ObjectFrame |
วัตถุ Rectangle |
วัตถุ ToggleButton |
คุณสามารถใช้คุณสมบัติ ด้านบน เพื่อระบุตําแหน่งที่ตั้งของวัตถุบน ฟอร์ม หรือ รายงาน อ่าน/เขียน จํานวนเต็ม สําหรับวัตถุทั้งหมดในรายการ นําไปใช้กับ ยกเว้นวัตถุ Report ซึ่งเป็น Long แบบอ่านอย่างเดียว
นิพจน์ จำเป็น นิพจน์ที่ส่งกลับวัตถุใดวัตถุหนึ่งข้างต้น
ข้อสังเกต
ตำแหน่งที่ตั้งของตัวควบคุมคือระยะทางที่วัดจากเส้นขอบด้านซ้ายหรือด้านบนไปยังเส้นขอบด้านซ้ายหรือด้านบนของส่วนที่มีตัวควบคุม การตั้งค่าคุณสมบัติ ด้านสุด เป็น 0 จะวางเส้นขอบของตัวควบคุมไว้ที่จุดบนสุดของส่วน เมื่อต้องการใช้ช่วยการวัดที่แตกต่างจากการตั้งค่าในกล่องโต้ตอบ ตัวเลือกภูมิภาค ในแผงควบคุมของ Windows ให้ระบุหน่วย เช่น ซม. หรือนิ้ว (ตัวอย่างเช่น 3 ซม. หรือ 2 นิ้ว)
ใน Visual Basic ให้ใช้ นิพจน์ตัวเลข เพื่อตั้งค่าของคุณสมบัตินี้ ค่าจะแสดงเป็นหน่วยทวิป
สำหรับตัวควบคุม คุณสามารถตั้งค่าคุณสมบัตินี้ได้โดยใช้ แผ่นคุณสมบัติ ของตัวควบคุม แมโคร หรือโค้ด Visual Basic for Applications (VBA)
เมื่อคุณย้ายตัวควบคุม การตั้งค่าคุณสมบัติ ด้านบน ใหม่จะถูกใส่ลงในแผ่นคุณสมบัติโดยอัตโนมัติ เมื่อคุณดูฟอร์มหรือรายงานในการแสดงตัวอย่างก่อนพิมพ์ หรือเมื่อคุณพิมพ์ฟอร์ม ตําแหน่งที่ตั้งของตัวควบคุมจะถูกกําหนดโดยการตั้งค่าคุณสมบัติ ด้านบน พร้อมกับการตั้งค่าระยะขอบของรายงาน ซึ่งพร้อมใช้งานโดยการคลิก ระยะขอบ บนแท็บ เค้าโครงหน้ากระดาษ
สําหรับรายงาน การตั้งค่าคุณสมบัติ ด้านบน คือจํานวนที่ส่วนปัจจุบันจะถูกออฟเซตจากด้านบนของหน้า การตั้งค่าคุณสมบัตินี้จะแสดงในหน่วยทวิป คุณสามารถใช้คุณสมบัตินี้เพื่อระบุระยะห่างของหน้าที่คุณต้องการให้ส่วนพิมพ์ในกระบวนงานเหตุการณ์ รูปแบบ ของส่วน
ตัวอย่าง
ตัวอย่างต่อไปนี้จะตรวจสอบการตั้งค่าคุณสมบัติ ด้านบน สําหรับรายงานปัจจุบัน ถ้าค่าน้อยกว่าการตั้งค่าระยะขอบต่ําสุด คุณสมบัติ NextRecord และ PrintSection จะถูกตั้งค่าเป็น เท็จ ส่วนจะไม่ไปยังระเบียนถัดไป และส่วนถัดไปจะไม่ถูกพิมพ์
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