อ้างอิงชื่อในซับฟอร์มให้ถูกก็จะสามารถใช้คำสั่งเหมือนกับฟอร์มหลักปกติทุกอย่างครับ
สมมุติ
- ฟอร์มหลักชื่อ Form1
- Textbox ในฟอร์มหลัก 2 ตัวที่ไว้ใส่ค่าช่วงวันที่ต้องการชื่อ Text1 และ Text2
- ฟอร์มย่อยชื่อ R_sale
- ฟิลด์ในฟอร์มย่อยที่เก็บวันที่ชื่อ aDate (ไม่ใช่ชื่อ Textbox ต้องเป็นชื่อฟิลด์ตาราง)

ใส่โค๊ดที่ปุ่ม ตกลง Event > On Click:

    Forms![Form1]![R_sale].Form.Filter = "aDate Between #" & Me.Text1 & "# And #" & Me.Text2 & "#"
    Forms![Form1]![R_sale].Form.FilterOn = True

ปรับใช้ดูครับ

ลองใส่ดูแล้ว กดได้ แต่ไม่มีอะไรโชว์ ฟอร์มย่อยเลยอ่ะคะ

ขออีเมลล์หน่อยได้มั้ยค่ะ เพื่อจะได้ถามมากกว่านี้ พอดีทำโปรเจคอ่ะคะ

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

ค่ะๆ ยังไงก็ขอบคุณมาก ลองใส่แล้วยแต่ไม่ได้ ก็พอเข้่าใจนะคะ แต่ไม่ได้เก่ง ก็เลยถามดู

ไม่แน่ใจเหมือนกันว่าจะพอช่วยเหลือได้จริงหรือเปล่า แต่หากอยากลองเสี่ยงดู ก็ส่งเมล์มาได้ที่ Guantine@gmail.com ไม่รับประกันว่าจะช่วยได้มากน้อยแค่ไหนนะครับ

ตามที่ถามในหัวข้อค่ะอ่ะคะ มีวิธีบ้างมั้ยคะ

เดี๋ยวค้นให้ ผมเคยเขียนเรื่องนี้ไว้ รอซัก 24 ชม.

ต้องส่งไฟล์มาให้ดูก่อน จะได้ดูว่าออกแบบฐานข้อมูลและความสัมพันธ์ไว้อย่างไร และทำอะไรไปแล้วบ้างแค่ไหน (หมายถึงตัวโปรเจ็คน่ะครับ)

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

จริงๆ ไม่ต้องใช้ Code เลยนะครับ ใช้แค่คิวรีธรรมดาๆ เอง

1.สมมุติที่ฟอร์ม R_Sale สร้างจากคิวรี่ ชื่อ Q_Sale โดยมีฟิวด์ครบตามที่ต้องการแสดงรายงาน และมีฟิวด์วันที่ ชื่อ SaleDate
2.สมมุติที่ Main Form ตั้งชื่อเป็น Form1 มีกล่องวันที่ให้เลือก 2 กล่อง ตั้งชื่อเป็น D1 กับ D2 และมีปุ่ม Submit เพื่อให้กดแล้วแสดงรายงานใน SubForm ที่ชื่อ R_Sale
3. ที่คิวรี่ชื่อ Q_Sale เขียนเงื่อนไขที่ฟิวด์ SaleDate เป็น Between Forms!Form1!D1 and Forms!Form1!D2
4.ที่ปุ่ม Submit ผูกมาโคร OnClick ให้ไปสั่ง Refresh ที่สับฟอร์มที่ชื่อ R_Sale

patcharapa2634@gmail.com ค่ะ

ใช้เวลานึกว่าไฟล์เก็บไว้ที่ไหน

ส่งไปให้แล้วนะครับ