قفل كردن object هاي روي فرم

[msf_2008]

سلام
من مي خوام text box ها و combo Box ها روي فرم به گونه اي باشد كه كاربر نتواند مقادير آنها را تغيير دهد مگر اين كه روي دكمه ي " ويرايش " كليك كند.
در اين صورت با زدن دكمه ي " ويرايش " امكان تغيير دادن ext box ها و combo Box ها وجود داشته باشد.
البته كد زير رو هم زدم ولي كار نمي كنه:

Private Sub cmdedit_Click()
Me.Combo1.Locked = False
Me.ro_roomNo.Locked = False
Me.ro_name.Locked = False
Me.ro_floorNo.Locked = False
cmdsave.Enabled = True
Me.Recordset.Edit

[alirezabahrami]

سلام
من مي خوام text box ها و combo Box ها روي فرم به گونه اي باشد كه كاربر نتواند مقادير آنها را تغيير دهد مگر اين كه روي دكمه ي " ويرايش " كليك كند.
در اين صورت با زدن دكمه ي " ويرايش " امكان تغيير دادن ext box ها و combo Box ها وجود داشته باشد.
البته كد زير رو هم زدم ولي كار نمي كنه:

Private Sub cmdedit_Click()
Me.Combo1.Locked = False
Me.ro_roomNo.Locked = False
Me.ro_name.Locked = False
Me.ro_floorNo.Locked = False
cmdsave.Enabled = True
Me.Recordset.Edit

سلام msf_2008 !
در اينجور مواقع براي رسيدن به جواب سريع ارائه نمونه است ؛ و حتماً لزومي به ارائه برنامه اصلي هم نمي باشد .
موفق باشيد

[mazoolagh]

در ظاهر مشکلی نیست - هر چند که کد بهتری هم میشه نوشت (ترکیب locked و enabled)

روی اولین خط کد یک breakpoint بگذارین و برنامه رو اجرا کنین و مطمئن بشین که وقتی روی باتن کلیک میکنن کد حتما اجرا میشه

[msf_2008]

سلام
مرسی از راهنمایی تون... مشکل رو حل کردم.
با تشکر: مریم