S
short
In an unbound table, I have figured out how to delete a record and edit a
record with just pressing a command button and it will either allow the user
to edit the record or delete. I am having troubles with the add new.
This is my code: (the Add new in this code does not work)
'///////////////////////////////////////////
'This part checks to see if the Buttons (new, edit, or delete)
'are pressed in. If they are then it will
'make sure that you can edit, add or delete in the form.
'
'sets the "Add New" button to let additions in the form
'If tgAdd.value = True Then
' Addbool = True
'ElseIf tgAdd.value = False Then
' Addbool = False
'End If
'sets the "Edit" button to let Edits in the form
If tgEdit.value = True Then
Editbool = True
ElseIf tgEdit.value = False Then
Editbool = False
End If
'sets the "Delete" button to let Deletions in the form
If tgDelete.value = True Then
Deletebool = True
ElseIf tgDelete.value = False Then
Deletebool = False
End If
'///////////////////////////////////////////
Thanks.
record with just pressing a command button and it will either allow the user
to edit the record or delete. I am having troubles with the add new.
This is my code: (the Add new in this code does not work)
'///////////////////////////////////////////
'This part checks to see if the Buttons (new, edit, or delete)
'are pressed in. If they are then it will
'make sure that you can edit, add or delete in the form.
'
'sets the "Add New" button to let additions in the form
'If tgAdd.value = True Then
' Addbool = True
'ElseIf tgAdd.value = False Then
' Addbool = False
'End If
'sets the "Edit" button to let Edits in the form
If tgEdit.value = True Then
Editbool = True
ElseIf tgEdit.value = False Then
Editbool = False
End If
'sets the "Delete" button to let Deletions in the form
If tgDelete.value = True Then
Deletebool = True
ElseIf tgDelete.value = False Then
Deletebool = False
End If
'///////////////////////////////////////////
Thanks.