เมื่อสั่งพิมพ์ให้ PageFooterSection พิมพ์เฉพาะหน้าสุดท้าย

[Un]

เมื่อสั่งพิมพ์ให้ PageFooterSection พิมพ์เฉพาะหน้าสุดท้าย

ใช้คำสั่งอย่างไรครับ

[PNR]

หมายถึงในหน้ารายงานให้แสดง ข้อมูลในส่วน PageFooter เฉพาะหน้าสุดท้ายใช่หรือเปล่า
ถ้าใช้ลองทำกำหนดแบบนี้

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Me.textboxName.Visible =(Me.Page = Me.Pages)
End if


TextboxName คือ ชื่อเท็กบ๊อกที่แสดงข้อมูลใน PageFooter
เวลาสั่งปริ้น ในหน้าสุดท้ายจะแสดงข้อมูลของ textboxName

[Un]

หมายถึงในหน้ารายงานให้แสดง ข้อมูลในส่วน PageFooter เฉพาะหน้าสุดท้ายใช่หรือเปล่า
ถ้าใช้ลองทำกำหนดแบบนี้

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Me.textboxName.Visible =(Me.Page = Me.Pages)
End if


TextboxName คือ ชื่อเท็กบ๊อกที่แสดงข้อมูลใน PageFooter
เวลาสั่งปริ้น ในหน้าสุดท้ายจะแสดงข้อมูลของ textboxName

อาจารย์ครับ ใน PageFooterSection มีคอลโทลหลายตัว มันสามารถ สั่งทั้งส่วนได้มั้ยครับ

[PNR]

ังั้นแก้เป็นแบบนี้

โค๊ด: [Select]

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Cancel = ([Page] <> [Pages])
End Sub
ให้ยกเลิกการแสดง ถ้าไม่ใช่หน้าสุดท้าย

[Un]

ังั้นแก้เป็นแบบนี้

โค๊ด: [Select]

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Cancel = ([Page] <> [Pages])
End Sub
ให้ยกเลิกการแสดง ถ้าไม่ใช่หน้าสุดท้าย

ว้าวววว  สุดยอดเลยอาจารย์ รักอาจารย์จริงๆ

ขอบคุณคราบบบบบบ