协同工作时，如何让每个人的备注不被冲掉

时　间:2017-12-02 20:09:09
作　者:帆   ID：29724  城市：吴江
摘　要:  通常会多次更新一记录，或多人更新一记录，里面的备注字段信息希望能追加，而不是这一次的冲掉上一次的。我的做法是锁定备注，新增一个文本框   新备注  用如下代码追加新备注，记录  谁，哪一天，追加什么内容，然后换行。
正　文:

        通常会多次更新一记录，或多人更新一记录，里面的备注字段信息希望能追加，而不是这一次的冲掉上一次的。我的做法是锁定备注，新增一个文本框   新备注  用如下代码追加新备注，记录  谁，哪一天，追加什么内容，然后换行。

    If IsNull(Me.新备注) Then
      rst![备注] = Me![备注]    ’如果无新备注，备注保持不变
    Else
      rst![备注] = Forms!SysFrmMain!Username & Format(Date, "yyyymmdd") & Me![新备注] & Chr(13) & Chr(10) & Me![备注]

      ’追加新备注并换行。
    End If

备注锁定了，不能更改，雁过留声。