锁定子窗体中的各个行

时间:2014-12-22 13:44:15

标签: vb.net access-vba ms-access-2010

我有一个表单正在读取具有一对多关系的数据。在表格中我有5列。每个字段最初都可以操作。但是我希望在填充第4列和第5列中的数据后锁定各行。有效地完成记录。我已经能够弄清楚如何关闭整个表单,而不是单独的行/记录。

这是我正在使用的代码。

If IsNullorEmpty(GPInterfaceID) Then
Me.ChargeType.Locked = True
Else
Me.ChargeType.Locked = False
End If
If IsNullorEmpty(GPPostingDate) Then
Me.ChargeType.Locked = True
Else
Me.ChargeType.Locked = False
End If

这是我尝试单独锁定各个列的代码版本。我也试过一次锁定所有这些。

我根本不熟悉VB。所以任何帮助将不胜感激。

1 个答案:

答案 0 :(得分:1)

您可以这样做:

Private Sub Form_Current()
    If IsNullorEmpty(GPInterfaceID) Then
        Me.ChargeType.Locked = True
    End If
End Sub

每次选择一行时都会触发该事件。如果在选定行中GPInterfaceID为空,则Access将锁定字段ChargeType。在那一刻,Access将在每一行中锁定该字段,但这并不重要,因为在您点击另一行时,Access将再次触发Form_Current()事件并锁定或解锁字段。