چگونه باید چند فیلد در فرم را با یک دکمه قفل یا باز کنم

[padide55]

همون کدها
false رو
عوض کنید
بجاش true
با یک دکمه دیگه

اگر با همین دکمه میخواید دوباره برگرده



()Private Sub Command18_Click
'--------first field----
if me.sho_S.enabled=true
then
me.sho_S.enabled=false
else
me.sho_S.enabled=true
endif
'--------second field----'
if me.tar.enabled=true
then
me.tar.enabled=false
else
me.tar.enabled=true
endif

end sub

کد شرط رو برای هر فیلد به این روش

اگر فیلد اول فعال باشد if
پسthen
فیلد اول غیرفعال بشود
اگر نهelse
فیلد اول فعال بشود
پایان شرطendif


اون خط چین و متن داخلش رو اگر خطا داد پاک کنید .