เขียนvba กำหนดคุณสมบัติให้กับ form(Run-time error
กระทู้เก่าบอร์ด อ.Yeadram

 1,957   4
URL.หัวข้อ / URL
เขียนvba กำหนดคุณสมบัติให้กับ form(Run-time error

Sub CustomerformAllow()
     Forms![Customer form].AllowAdditions = False
     Forms![Customer form].AllowDeletions = False
     Forms![Customer form].AllowEdits = False
End Sub

ฟอร์มชื่อ " Customer form" ไม่ได้เปิดอยู่ค่ะแต่ต้องการกำหนดคุณสมบัติให้กับฟอร์มนี้ว่าไม่ให้มีการเพิ่ม ลบ แก้ไข ไม่ทราบว่าจะต้องเขียนโค้ดอย่างไรหรอคะ
คือเขียนโค้ดตามข้างบน(เขียนมั่วค่ะ) มันมีmsgboxแสดงขึนมาว่า

Run-time error '2450'

Microsoft Office Access can't find the form 'Customer form' referred to in a macro expression or Visual Basic code

ขอบพระคุณล่วงหน้าค่ะ

4 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R08821
พอทราบแล้วค่ะว่าทำไมถึงไม่ได้ คือมันต้องเปิดฟอร์มนั้นก่อนแล้วค่อยใช้คำสั่งดังกล่าวข้างต้น แบบนี้ค่ะ

Sub CustomerformAllow()
    DoCmd.OpenForm "Customer form"
    Forms![Customer form].AllowAdditions = False
     Forms![Customer form].AllowDeletions = False
     Forms![Customer form].AllowEdits = False
     DoCmd.Save acForm, "Customer form"    
End Sub

แต่พอปิดฟอร์มแล้วเปิดใหม่ ก็ยังสามารถเพิ่ม ลบ แก้ไข เหมือนเดิมค่ะ
คือโปรแกรมที่ทำมีการจำกัดสถานะผู้เข้าใช้ค่ะ จึงอยากให้ตลอดการใช้งานของผู้ใช้ไม่ได้อยู่ในสถานะลูกค้าให้สามารถดูข้อมูลลูกค้าได้เพียงอย่างเดียวตลอดการใช้งานค่ะ
...ควรเขียนคำสั่งว่าอย่างไรดีค่ะ ขอคำแนะนำด้วยค่ะ
2 @R08823
ถ้าทุกครั้งที่จะเปิด Customer form จะต้องทำผ่าน procedure CustomerformAllow( ) เสมอ มันก็น่าจะทำได้นะครับ แต่ถ้าเปิดฟอร์มโดยการเลือกเปิดจาก Database Window เองโดยตรง อย่างนี้มันก็จะแก้ไขได้ครับ


ควรเขียนคำสั่งว่าอย่างไรดีค่ะ ต้องเป็น ควรเขียนคำสั่งว่าอย่างไรดีคะ
3 @R10695
vba access 2007 เขียนคำสั่งให้ฟอร์มทำงานทดสอบแล้วใช้ได้แต่พอออกจากโปรแกรมแล้วเข้าใหม่กลับใช้ไม่ได้เป็นเพราะอะไรครับ
ขอบคุณครับ
4 @R10696
- โค้ดเขียนว่ายังไง
- "เข้าใหม่กลับใช้ไม่ได้" มันมีอาการอย่างไร, error code อะไร/ข้อความบอกว่าอย่างไร

เวลาจะอธิบายควรอธิบายให้ละเอียดนะครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3170s