Proprietà .ConsentiModifiche

Si applica a

Oggetto Form

È possibile usare la proprietà .ConsentiModifiche per specificare se un utente può modificare i record salvati quando usa una maschera. Oggetto Boolean di lettura/scrittura.

espressione.ConsentiModifiche

espressione Obbligatorio. Espressione che restituisce uno degli oggetti inclusi nell'elenco Si applica a.

Impostazione

La proprietà .ConsentiModifiche usa le impostazioni seguenti.

Impostazione

Visual Basic

Descrizione

True

(Impostazione predefinita) L'utente può modificare i record salvati.

No

False

L'utente non può modificare i record salvati.


È possibile impostare la proprietà .ConsentiModifiche usando la finestra delle proprietà della maschera, una macro o il codice di Visual Basic, Applications Edition (VBA).

Osservazioni

È possibile usare la proprietà .ConsentiModifiche per impedire la modifica dei dati esistenti visualizzati da una maschera. Se si vogliono impedire le modifiche dei dati in un controllo specifico, usare la proprietà .Abilitato o Bloccato.

Per impedire modifiche ai record esistenti, ovvero configurare una maschera come di sola lettura, impostare le proprietà .ConsentiAggiunte, .ConsentiEliminazioni e .ConsentiModifiche su No. È anche possibile configurare i record come di sola lettura impostando la proprietà .TipoRecordset su Snapshot.

La modifica di un valore del campo a livello di programmazione rende modificabile il record corrente, indipendentemente dalla impostazione della proprietà .ConsentiModifiche. Se si vuole impedire all'utente di apportare modifiche a un record (il valore di .ConsentiModifiche è No) che è necessario modificare a livello di programmazione, salvare il record dopo ogni modifica apportata a livello di programmazione; l'impostazione della proprietà .ConsentiModifiche verrà applicata anche dopo che le modifiche non salvate al record corrente vengono salvate.

Nota : Quando è impostato l'argomento relativo alla modalità di immissione dati dell'azione OpenForm, Microsoft Office Access 2007 eseguirà l'override di alcune impostazioni delle proprietà della maschera. Se l'argomento relativo alla modalità di immissione dati dell'azione OpenForm è impostato su Edit, Access aprirà la maschera con le impostazioni seguenti delle proprietà:

  • .ConsentiModifiche - Sì

  • .ConsentiEliminazioni - Sì

  • .ConsentiAggiunte - Sì

  • .ImmissioneDati - No

Per impedire all'azione ApriMaschera di eseguire l'override delle impostazioni delle proprietà esistenti, omettere l'impostazione dell'argomento relativo alla modalità di immissione dati, in modo che Access usi le impostazioni delle proprietà definite dalla maschera.

Esempio

L'esempio seguente esamina la proprietà ControlType per tutti i controlli in una maschera. Per ogni controllo etichetta e per ogni controllo casella di testo la routine attiva/disattiva la proprietà SpecialEffect per questi controlli. Quando la proprietà SpecialEffect dei controlli etichetta è impostata su Ombreggiato, la proprietà SpecialEffect dei controlli casella di testo è impostata su Normale e le proprietà .ConsentiAggiunte, .ConsentiEliminazioni e .ConsentiModifiche sono tutte impostate su True, la variabile intCanEdit viene attivata/disattivata per consentire la modifica dei dati sottostanti.

Sub ToggleControl(frm As Form)
Dim ctl As Control
Dim intI As Integer, intCanEdit As Integer
Const conTransparent = 0
Const conWhite = 16777215
For Each ctl in frm.Controls
With ctl
Select Case .ControlType
Case acLabel
If .SpecialEffect = acEffectShadow Then
.SpecialEffect = acEffectNormal
.BorderStyle = conTransparent
intCanEdit = True
Else
.SpecialEffect = acEffectShadow
intCanEdit = False
End If
Case acTextBox
If .SpecialEffect = acEffectNormal Then
.SpecialEffect = acEffectSunken
.BackColor = conWhite
Else
.SpecialEffect = acEffectNormal
.BackColor = frm.Detail.BackColor
End If
End Select
End With
Next ctl
If intCanEdit = IFalse Then
With frm
.AllowAdditions = False
.AllowDeletions = False
.AllowEdits = False
End With
Else
With frm
.AllowAdditions = True
.AllowDeletions = True
.AllowEdits = True
End With
End If
End Sub
Amplia le tue competenze
Esplora i corsi di formazione
Ottieni in anticipo le nuove caratteristiche
Partecipa al programma Office Insider

Queste informazioni sono risultate utili?

Grazie per i tuoi commenti e suggerimenti

Grazie per il tuo feedback! Potrebbe essere utile metterti in contatto con uno dei nostri operatori del supporto di Office.

×