การใซ้ Checkbox ใน subform ของaccess

[nousinh]

สวัสดีครับผมอยากสอบถามเรื่องการใช้ Checboxใน subform ของ access. ถ้าเลือกแล้ว สินค้าที่เราเลือกจะบันทึกไปยังอีกฟอร์มหนึ่ง แล้วเราสามารถทำรายงานออกมา. ผมขอรบกวน ถามผู้รู้หน่อยได้ไหมครับ พอมี code หรือวิดีโอ ตัวอย่างไหมครับ.

[ปิ่นณรงค์]

สวัสดีครับผมอยากสอบถามเรื่องการใช้ Checboxใน subform ของ access. ถ้าเลือกแล้ว สินค้าที่เราเลือกจะบันทึกไปยังอีกฟอร์มหนึ่ง แล้วเราสามารถทำรายงานออกมา. ผมขอรบกวน ถามผู้รู้หน่อยได้ไหมครับ พอมี code หรือวิดีโอ ตัวอย่างไหมครับ.

ยังไม่ค่อยเข้าใจคำถามครับ
มีไฟล์ตัวอย่างไหมที่ทำอยู่ไหม เดี่ยวลองทำให้ดู

[nousinh]

ผมแนบไฟล์ที่อยู่ด้านล่างแล้วนะครับ คือแบบว่าผมอยากทำcheckboxอยู่ในform1 แล้วสามารถที่จะควบคุมcheckboxส่งค่าrecordตัวใดตัวหนึ่งไปยังอีกฟอร์ม

[ปิ่นณรงค์]

ลองดูแบบนี้นะครับ
เรื่องฐานข้อมูลท่านออกแบบเองเลย อันนี้ทำสร้างพอที่จะใช้งาน ตัวอย่างได้
วิธีการคือ สร้างคิวรี่ เพื่อกรองข้อมูลจาก ID และสถานะ CheckBox ของเราพอได้มาแล้วกด
เปิดฟอร์มมา ก็จะได้ข้อมูลตามที่เราเลือกไว้
หรือถ้าอยากได้เพิ่มเติมแบบไหน ก็สอบถามได้นะครับ

หน้าแรกกดเลือก

หน้าต่อไป



ตัวอย่างด้านล่าง

[nousinh]

โปรแกรมที่พี่ส่งมา เวลาผมเลือกเล็กคอร์ดแล้วกดปุ่มเปิดฟอร์มต่อไปแล้วทำไมมันไม่ไปที่ฟอร์มออกรายงานอ่ะครับ มันเป็นเพราะอะไร เป็นเพราะพี่เขียนcodeไว้หรอครับ พอดีผมไม่เก่งเรื่องcodeสักเท่าไหร่ 

[ปิ่นณรงค์]

โปรแกรมที่พี่ส่งมา เวลาผมเลือกเล็กคอร์ดแล้วกดปุ่มเปิดฟอร์มต่อไปแล้วทำไมมันไม่ไปที่ฟอร์มออกรายงานอ่ะครับ มันเป็นเพราะอะไร เป็นเพราะพี่เขียนcodeไว้หรอครับ พอดีผมไม่เก่งเรื่องcodeสักเท่าไหร่ 

ใช่คับใช้ คิวรี่ที่ตัวรายงานเหมือนตัวในฟอร์ม และ ใส่ code เปิดรายงายไว้คับ

[nousinh]

พี่ผมต้องแก้ตัวไหนบ้างครับ ถ้าเป็นไปได้ผมขอตัวที่ใช้งานได้เลยได้ไหมครับ ผมต้องขอโทษจริงๆครับ ผมยังมือใหม่ในการใข้Accessครับ

[ปิ่นณรงค์]

พี่ผมต้องแก้ตัวไหนบ้างครับ ถ้าเป็นไปได้ผมขอตัวที่ใช้งานได้เลยได้ไหมครับ ผมต้องขอโทษจริงๆครับ ผมยังมือใหม่ในการใข้Accessครับ

จากที่เช็ค ที่มันขึ้นแจ้งเตือนนั้นเป็น การแจ้งเตือนว่า ขอบกระดาษเกินแต่ถ้ากด ok มันก็จะเปิดรายงานได้ปกติครับ

อันนี้ผมแก้ให้แจ้งเตือนนั้นหายไปแล้วลองไปเปิดดูใหม่นะครับ
ถ้ามือใหม่จริงๆ อยากหัดเขียนโปรแกรมติดตรงไหน หรืออยากให้มันออกมาเป็นแบบไหนก็สอบถามได้นะครับเดี่ยวช่วยดูให้

[nousinh]

พี่ผมกดปุ่มเปิดฟอร์มต่อไปแต่มันยังออกแบบนี้ผมต้องแก้ไขตรงไหนครับ
https://www.thai-access.com/tiupld/view.php?id=p8ml9o-c25285

[nousinh]

[ปิ่นณรงค์]

ไว้ผม กลับจากเล่นคอนเสริตคืนนี้ก่อน เดี่ยวทีมวิวไปทำให้ดูครับ

[nousinh]

ขอบคุณครับพี่    ผมมีไฟล์ตัวอย่างที่อยากจะให้พี่ช่วยดูให้หน่อย ทำแบบตัวCheckbox แล้วให้ส่งค่าrecordไปยังที่ฟอร์มรายงานครับ และ ถ้ามีส่วนไหนที่ผิดพลาดผมขอลบกวนให้พี่ช่วยแก้ไขให้ผมหน่อยได้ไหมครับ เช่นว่าการทำ คิวรี่ หรือ การทำฟอร์มช่วยแนะนำผมหน่อยครับคือผมทำได้แค่นี้ครับ

[ปิ่นณรงค์]

ผมได้ทำตัวอย่างให้ใหม่นะครับ
ที่แก้ไปคือ
1.การค้นหาข้อมูล Size_Type ให้เลือกเสร็จแล้วกดค้นหา ถ้าต้องการแสดงข้อมูลทั้งหมดอีกครั้งให้ลบรายการออกแล้วกดค้นหา
2.เพิ่ม Check20 ถ้ากดติ๊กเลือกอยู่ก็จะปริ้น ส่วนที่ติ๊กเลือก
3.แก้ไขฟอร์มเป็น Continuous Forms
เพราะดูจากข้อมูลแล้วไม่มีความจำเป็นที่จะทำ Sub Form
ตัวอย่างด้านล่าง

4.ถ้าต้องการ เคลีย Checkbox เพื่อติ๊กเลือกใหม่ กดที่ปุ้ม ลบ นะครับ

[nousinh]

ขอบคุณครับพี่ 
พี่ผมอยากจะเพิ่มปุ่ม Show All. พอดีว่าเวลาเราเลือกขนาดแล้วอยากให้มันกลับไปแสดงตารางทั้งหมดอีกครั้ง

[nousinh]

และก็ผมอยากให้แบบฟอร์มไม่แสดงตารางก่อนที่จะเลือกขนาดครับ

[ปิ่นณรงค์]

ทำให้แล้วครับ
เมื่อเปิดโปรแกรมมาให้ซ่อนรายการ

โค๊ด: [Select]

Private Sub Form_Current()
Call ShowList
End Sub
Sub ShowList()
If IsNull(Me.cb_GSP) Then
Me.Check20.Visible = False
Me.factory.Visible = False
Me.SteelID.Visible = False
Me.Adress.Visible = False
Me.PhoneNumber.Visible = False
Me.Size_Type.Visible = False
Me.Thickness.Visible = False
Me.Length.Visible = False
Me.weight.Visible = False
Me.Price.Visible = False
Else
Me.Check20.Visible = True
Me.factory.Visible = True
Me.SteelID.Visible = True
Me.Adress.Visible = True
Me.PhoneNumber.Visible = True
Me.Size_Type.Visible = True
Me.Thickness.Visible = True
Me.Length.Visible = True
Me.weight.Visible = True
Me.Price.Visible = True
End If
End Sub
Private Sub Image57_Click()
Call ShowList
End Sub
ตัวอย่างให้แสดงข้อมูลทั้งหมดอีกครั้ง และให้ cb_GSP เป็นค่าว่าง

โค๊ด: [Select]

DoCmd.ApplyFilter , " Size_Type like '*'"
Me.cb_GSP = Null
ผมได้ทำไอค่อนให้กดเพื่อ ซ่อนรายการให้ด้วยนะครับ ที่เป็นรูปดวงตา


ตัวอย่างด้านล่าง

[nousinh]

พี่คือฮีโร่ผมเลียครับ ขอบคุณมากๆครับพี่

[nousinh]

สวัสดีครับพี่ผมขออนุญาตรบกวนถาม. ถ้าผมมีตารางสามแบบที่เนื้อหาคล้ายคือกันแล้วผมต้องการทำฟอร์มรายงานแบบฟอร์มเดียวกันได้ไหมครับแบบผมไม่ต้องทำคิวรี่ที่ซ้ำซ้อนกัน