string的几个函数，vb应该用得到

zzhgb

Option Explicit
Private Declare Function MD5String Lib "CommonFunc.dll" (ByVal s As String) As String
Private Declare Function GuidString Lib "CommonFunc.dll" () As String
Private Declare Function Base64Enc Lib "CommonFunc.dll" (ByVal s As String) As String
Private Declare Function Base64Dec Lib "CommonFunc.dll" (ByVal s As String) As String
Private Declare Function CRC_16 Lib "CommonFunc.dll" (ByRef buf As Byte, ByVal nLen As Long) As Long

Private Declare Function DesEncrypt Lib "CommonFunc.dll" (ByVal s As String, ByVal key As String) As String
Private Declare Function DesDecrypt Lib "CommonFunc.dll" (ByVal s As String, ByVal key As String) As String

zzhgb

小垃圾，希望不要唾弃

Tesla.Angela

在本论坛，任何人都没有鄙视别人的特权。

wszjljx

不错啊 加密解密的DLL...
先试试看...

zzhgb

觉得vb有时做这些事情还是有些麻烦的，都是winapi生成的，速度和稳定应该还可以
不能跨平台{:soso_e113:}

zzhgb

改为静态编译，增加 SHAString(ByVal s As String) As String

wszjljx

是易语言写的DLL把 感觉效率还是VB自己的高一点哈... 不知道静态编译之后会不会好点...

zzhgb

wszjljx 发表于 2011-11-6 22:50
是易语言写的DLL把 感觉效率还是VB自己的高一点哈... 不知道静态编译之后会不会好点...

vs2010的，六楼是静态编译的，没有自己算，调的advapi
估计vc6性能好些

Tesla.Angela

zzhgb 发表于 2011-11-7 18:33
vs2010的，六楼是静态编译的，没有自己算，调的advapi
估计vc6性能好些

VC6太老了