command button & controls

K

koko

in a form, i want to (step 1)lock some controls at same
time disable a command button when clicked. And
(step 2)'refresh' (unlock/enable) when i go to a new
record. furthermore,(Step 3) i want the controls/command
button of previous records to remain locked/disabled when
browsed.

the procedures below does steps 1 & 2. what do i need to
add or change so it can so it can also execute step 3.
right now, when im in a new record and did not hit the
command button before going back to previous records, the
controls/command button are also unlocked/enabled.

thanks for your help in advance.

Private Sub SOFinalizeCB_Click()
Me!PartID.Locked = True
Me!SORefNo.Locked = True
Me!SOFinalize = "Yes"
[PartID].SetFocus
Me!SOFinalizeCB.Enabled = False
End Sub

Private Sub Form_Current()
If Me.NewRecord = True Then
Me.PartID.Locked = False
Me.SORefNo.Locked = False
Me!SOFinalizeCB.Enabled = True
End If
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

command buttons & controls 1
Lock/unlock form button 4
Activating a Command Button on a Form 2
Hiding a button based on a value in a table 1
Macro to unlock content controls 0
Command Button Question 8
command button for find records 3
If Then Not working Properly 9

Top