Properti AllowEdits

Berlaku untuk

Anda dapat menggunakan properti AllowEdits untuk menentukan apakah pengguna dapat mengedit data yang tersimpan saat menggunakan formulir. Boolean baca/tulis.

ekspresi.AllowEdits

ekspresi Diperlukan. Ekspresi yang mengembalikan salah satu objek dalam daftar Berlaku Untuk.

Pengaturan

Properti AllowEdits menggunakan pengaturan berikut.

Anda dapat mengatur properti AllowEdits menggunakan formulir lembar properti, makro, atau kode Visual Basic for Applications (VBA).

Keterangan

Anda dapat menggunakan properti AllowEdits untuk mencegah perubahan ke data yang sudah ada yang ditampilkan oleh formulir. Jika Anda ingin mencegah perubahan pada data dalam kontrol tertentu, gunakan properti Enabled atau Locked.

Jika ingin mencegah perubahan pada data yang sudah ada (membuat formulir baca saja), atur properti AllowAdditions, AllowDeletions, dan AllowEdits ke Tidak. Anda juga dapat membuat data baca saja dengan mengatur properti RecordsetType ke Snapshot.

Mengubah nilai bidang secara terprogram menyebabkan data saat ini dapat diedit, terlepas dari pengaturan properti AllowEdits. Jika ingin mencegah pengguna membuat perubahan pada data (AllowEdits diatur Tidak) yang perlu Anda edit secara terprogram, simpan data setelah perubahan apa pun secara terprogram; pengaturan properti AllowEdits akan digunakan sekali lagi setelah perubahan yang tidak tersimpan apa pun pada data saat ini disimpan.

• AllowEdits — Ya

• AllowDeletions — Ya

• AllowAdditions — Ya

• DataEntry — Tidak

Agar tindakan OpenForm tidak menimpa salah satu dari pengaturan properti yang sudah ada ini, hilangkan pengaturan argumen Data Mode sehingga Access akan menggunakan pengaturan properti yang ditentukan oleh formulir.

Contoh

Contoh berikut ini memeriksa properti ControlType untuk semua kontrol pada formulir. Untuk setiap kontrol label dan kotak teks, prosedur mengaktifkan/menonaktifkan properti SpecialEffect untuk kontrol tersebut. Ketika properti SpecialEffect kontrol label diatur ke Berbayang dan properti SpecialEffect kontrol kotak teks diatur ke Normal dan properti AllowAdditions, AllowDeletions, dan AllowEdits semua diatur ke True, variabel intCanEdit diaktifkan/dinonaktifkan untuk mengizinkan pengeditan data yang mendasari.

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