他可以辅助记录开机关机等事件的发生时间
如果你把它加入 任务管理器 的话，加上 适当的参数，会有许多用途的！
[attach]31[/attach]

我写的东西还可以是吧 ？（^_^ 。。。偷笑中。。。）

我还以为什么东西呢，没有什么用！

可以简单完成的代码，你给复杂化了。

比如去掉尾部空格这一段

For i = 1 To Len(username) If Right(username, 1) = " " Then username = Left(username, Len(username) - 1) Else Exit For End If Next i

和获得工作路径

filename = App.Path For i = Len(filename) To 1 If Mid(filename, i, 1) = "\" Then filename = Left(filename, i) Exit For End If Next i

顶2楼

去掉空格可以用trim（）；

第二个忘记了。

看了后有点启发

THANK YOU!

为什么不能下载来看看代码啊?

各位大哥，有空到小弟网站http://xingxing0.512j.com看一下小弟的作品吧，也好给我一些批评啊。