写着玩玩 :我喜欢用自己写的软件!
他可以辅助记录开机关机等事件的发生时间如果你把它加入 任务管理器 的话,加上 适当的参数,会有许多用途的!
[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
各位大哥,有空到小弟网站http://xingxing0.512j.com看一下小弟的作品吧,也好给我一些批评啊。