代码改变世界

随笔档案-2004年12月

API版本的TrimNull函数

2004-12-03 00:26 by 电脑人生, 230 阅读, 收藏,
摘要: 很有用的API版本的TrimNull函数:Private Declare Function lstrlenW Lib "kernel32" (ByVal lpString As Long) As Long Private Function TrimNull(startstr As String) As String TrimNull = Left(startstr, lstrlenW(StrPtr(startstr))) End Function 阅读全文

今天完成了一个加密解密算法的编写

2004-12-01 11:06 by 电脑人生, 166 阅读, 收藏,
摘要: 开发平台:VB6demo中我把自己的名字重复七遍然后加密,再解密,效果不错!程序运行效果图: 阅读全文