Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Me.[NameOfControl].Locked = Me.chkLockControls
Dim ctl As Control
For Each ctl in Me.Controls
If ctl.Tag = "lock"
ctl.Locked = Me.chkLockControls
End If
Next