主题：[求助]beforecloseproject事件代码的问题

我在beforecloseproject事件中加入了如下代码，可是在关闭项目时出现如下图的错误，请问是什么原因呢？

'将当前用户的所有行解锁

For Each dt As DataTable In DataTables

    If dt.DataCols.Contains("sys_locked") Then

        Dim cmd As New SQLCommand

        cmd.CommandText = "Update {" & dt.Name & "} Set sys_locked = Null Where sys_locked = '" & _UserName & "'"

        cmd.ExecuteNonQuery

    End If

Next

此主题相关图片如下：截图03.jpg