看了某帖后，保存按钮采用了下列代码，如果执行了注释行，则人员管理表中用星号保护的密码将变为明码，且行号全部被列标题的默认背景色覆盖（点击行号列顶部会全部恢复显示）。另外，星号保护的密码列应该禁止被导出为Excel文件，否则也将泄密。所以，应该用MD5算法加密密码。

\'SystemReady = False

Try

    For Each dt As DataTable In DataTables

        If dt.name<>"加班差费" AndAlso dt.name<>"表列管理" Then

            dt.Save

        End If

    Next

Catch ex As Exception

    MessageBox.Show("保存数据失败!")

End Try

\'SystemReady = True