AfterSaveProject

保存项目之后执行。

示例

为了能在项目文件目录下生成一个文本文件“save.txt”，记录每次存盘时的用户名和时间，可在AfterSaveProject事件中加入下面的代码：

Dim FileName As String = ProjectPath & "save.txt"
Dim Info As String = User.Name & "|" & Date.Now & vbcrlf
FileSys.WriteAllText(FileName, Info, True)