เราทำการสร้างฟอร์มและใช้ Datagridview กับ Button ดังภาพครับ ส่วนสำคัญเราใช้เครื่องมือ PrintPreviewDialog1 และ PrintDocument มาเป็นตัวเอกในที่นี้ครับ
หลังจากได้เครื่องมือครบถ้วนแล้ว อันดับแรกก็ทำให้ Datagridview แสดงข้อมูลออกมาก่อนครับโดยใช้โค้ดจากบทความก่อนหน้านี้ก็ได้ครับ
อยากให้สังเกตุนิดนึงนะครับว่าตรงกรอบสีแดงที่ผมได้วงไว้ให้นั้นเป็นสิ่งที่ต้องเขียนตอนโหลดฟอร์มขึ้นมาครับ หลังจากนั้นเขียนฟังก์ชันเพื่อทำการเรียกใช้โดยส่วนนี้จะเป็นส่วนกำหนดจุดแสดงข้อมูลครับ
อธิบายนะครับ
Dim row As Integer = 50 กำหนดพิกัดแถว
Dim col As Integer = 350 กำหนดพิกัดคอลัมน์
Dim PrintFont As New Font("Angsana NEW", 16) กำหนดรูปแบบฟอร์นเก็บ Angsana New มีขนาดตัวอักษร 16 ครับ
Dim PrintPosition As New PointF เป็นการสร้างตัวแปรพิกัดครับเพื่อใช้กับ row,col ครับ
Dim PrintColor As New SolidBrush(Color.Black) อันนี้ก็เป็นสีตัวอักษรครับผม
For x = 0 To DataGridView1.Rows.Count - 2 ส่วนนี้คือการวนเอาค่าที่อยู่ใน Datagridview ออกมา
PrintPosition = New PointF(col, row) นำตัวแปร Printposition ที่เราประกาศไว้รับค่าพิกัด
e.Graphics.DrawString(DataGridView1.Rows(x).Cells(0).Value.ToString, PrintFont, PrintColor, PrintPosition) ทำการวาดหรือเขียนค่าที่อยู่ใน Datagridview โดยที่ให้เป็นรูปแบบฟอร์น สีฟอร์น และตำแหน่งการแสดงข้อความตาม ที่กำหนด
row = row + 50 กำหนดให้แถวที่จะแสดงเป็นบรรทัดใหม่คือการเพิ่มค่าจากบรรทัดเดิมครับ
Next
บทสรุป เป็นไงครับหวังว่าบทความนี้จะเป็นอะไรที่มีประโยชน์กับท่านที่ผ่านเข้ามาอ่านบ้างนะครับ โดยส่วนตัวเคยใช้ครับเลยนำมาเผยแพร่ให้ดูกัน
ขอบคุณครับ ตามหามานานแสนนาน จนกว่าจะหาเจอนี่ผมค้นไปตั้งสิบกว่ารอบ
ตอบลบบอกหน่อย
ตอบลบความคิดเห็นนี้ถูกผู้เขียนลบ
ตอบลบคือหนูทำตามเเล้วเเต่ข้อมูลจากDataGridView มาไม่หมดอ่ะคะ มาเเค่เเถวเเรก
ตอบลบ