AllowEdits 属性

重要:  本文是由机器翻译的,请参阅免责声明。请在 此处 中查找本文的英文版本以便参考。

适用于

窗体对象

您可以使用AllowEdits属性指定是否使用窗体时,用户可以编辑已保存的记录。读取/写入布尔

表达式允许编辑

表达式必填。返回一个对象应用于列表中的表达式。

设置

AllowEdits属性使用以下设置。

设置

Visual Basic

说明

True

(默认值)用户可以编辑已保存的记录。

错误

用户无法编辑已保存的记录。


使用窗体的属性表、 宏或 Visual Basic for Applications (VBA) 代码,您可以设置AllowEdits属性。

备注

AllowEdits属性可用于防止更改显示的窗体的现有数据。如果您想要防止特定控件中的数据进行更改,请使用启用锁定属性。

如果您想要禁止对现有记录 (只读使窗体) 进行更改,将允许添加允许删除,和AllowEdits属性设置为否。您还可以通过将RecordsetType属性设置为快照利用记录只读状态。

更改字段值以编程方式将导致当前记录,可以进行编辑,而不考虑AllowEdits属性设置。如果您想要防止用户对记录 (AllowEdits) 进行更改,您需要保存任何编程更改; 之后的记录,以编程方式编辑在保存到当前记录的任何未保存的更改后,将再次有效AllowEdits属性设置。

注意: 当数据 Mode 参数 openform 宏的设置时, Microsoft Office Access 2007将覆盖窗体属性设置的数目。如果OpenForm操作的数据模式参数设置为编辑,Access 将使用以下属性设置打开窗体:

  • AllowEdits — 是

  • 允许删除— 是

  • AllowAdditions — 是

  • DataEntry -无

若要防止覆盖任何现有属性设置OpenForm操作,请省略数据模式参数设置,以便 Access 将使用按窗体定义属性设置。

示例

下面的示例检查窗体上的所有控件的ControlType属性。对于每个标签和文本框控件,该过程切换这些控件的SpecialEffect属性。当标签控件的SpecialEffect属性设置为阴影和文本框控件的SpecialEffect属性设置为普通允许添加允许删除AllowEdits属性都设置为TrueintCanEdit变量切换允许编辑基础数据。

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

注意: 机器翻译免责声明:本文是由无人工介入的计算机系统翻译的。Microsoft 提供机器翻译是为了帮助非英语国家/地区用户方便阅读有关 Microsoft 产品、服务和技术的内容。由于机器翻译的原因,本文可能包含词汇、语法或文法方面的错误。

扩展你的技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×