กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
312 6
URL.หัวข้อ /
URL
Sub form รับค่าจาก อีกฟอร์มยังไงครับ?
...คือมีฟอร์มหลักคือ frm_main มี text box ชื่อ text0 เมื่อคลิกที่ text0 จะ open form ที่ชื่อ calendar แบบ dialog ซึ่งมี calendar control เมื่อคลิกวันที่แล้วก็จะ ใส่ค่าที่ text0 ด้วย ผมใช้โค้ด
Private Sub MonthView1_DateClick(ByVal DateClicked As Date)
Forms![frm_main].[Text0].Value = MonthView1.Value <<<<<<<<<<.......
DoCmd.Close acForm, Me.Name
End Sub
ใช้ได้ไม่มีปัญหา
แต่พอใน frm_main มี sub form สมมติเป็น sub_main และใน sub_main มี textbox คือ text1 ลักษณะแบบเดียวกัน ผมใช้โค้ดเป็น
.....Forms![sub_main].[Text1].Value = MonthView1.Value
จะมีปัญหา... access ฟ้อง error ว่า ไม่พบฟอร์ม sub_main ทั้งที่เมื่อเปิด sub_main เป็นฟอร์มเดียวโดดๆ จะใช้งานได้ปกติ แต่พอเป็น sub form ใน frm_main กลับมีปัญหาดังกล่าว
...จะมีวิธีแก้ไขยังไงครับ...
Private Sub MonthView1_DateClick(ByVal DateClicked As Date)
Forms![frm_main].[Text0].Value = MonthView1.Value <<<<<<<<<<.......
DoCmd.Close acForm, Me.Name
End Sub
ใช้ได้ไม่มีปัญหา
แต่พอใน frm_main มี sub form สมมติเป็น sub_main และใน sub_main มี textbox คือ text1 ลักษณะแบบเดียวกัน ผมใช้โค้ดเป็น
.....Forms![sub_main].[Text1].Value = MonthView1.Value
จะมีปัญหา... access ฟ้อง error ว่า ไม่พบฟอร์ม sub_main ทั้งที่เมื่อเปิด sub_main เป็นฟอร์มเดียวโดดๆ จะใช้งานได้ปกติ แต่พอเป็น sub form ใน frm_main กลับมีปัญหาดังกล่าว
...จะมีวิธีแก้ไขยังไงครับ...
6 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R03892
ไม่รู้ใช้หรือเปล่า
Forms![frm_main]![sub_main].Form![Text1].Value = MonthView1.Value
Forms![frm_main]![sub_main].Form![Text1].Value = MonthView1.Value
3 @R03894
ใช่เลยครับ
ขอบคุณคุณ moo มากครับ
ขอบคุณคุณ moo มากครับ
4 @R03900
...ผมใช้ Access 2002 ครับ ทดลองดู ยังฟ้องลักษณะแบบเดิมครับ
5 @R03907
ลองตรวจสอบว่า ชื่อฟอร์ม หรือ ซับฟอร์ม ต่างๆ ถูกต้องหรือเปล่า
ถ้าไม่ลำบากก็ส่งไฟล์ตัวอย่างมาดูนะครับ
ถ้าไม่ลำบากก็ส่งไฟล์ตัวอย่างมาดูนะครับ
6 @R03928
...ใช่ครับคุณ moo ผมลองเปลี่ยนชื่อ sub form ซึ่งตอนแรกผมใช้ชื่อจากรายการ Form ซึ่งพอดีมันไม่เหมือนกับใน Form property :-) ตอนนี้ใช้งานได้แล้วครับ
ขอบคุณทุกคนครับ
:-)
ขอบคุณทุกคนครับ
:-)
Time: 0.0879s
Forms![sub_main].Form.[Text1].Value = MonthView1.Value