zzhgb 发表于 2011-10-30 21:41:28

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

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 发表于 2011-10-30 21:42:21

小垃圾,希望不要唾弃

Tesla.Angela 发表于 2011-10-30 21:47:31

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

wszjljx 发表于 2011-10-30 21:55:11

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

zzhgb 发表于 2011-10-30 22:01:27

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

zzhgb 发表于 2011-10-31 19:51:10

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

wszjljx 发表于 2011-11-6 22:50:17

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

zzhgb 发表于 2011-11-7 18:33:57

本帖最后由 zzhgb 于 2011-11-7 18:40 编辑

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

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

Tesla.Angela 发表于 2011-11-8 01:24:47

zzhgb 发表于 2011-11-7 18:33 static/image/common/back.gif
vs2010的,六楼是静态编译的,没有自己算,调的advapi
估计vc6性能好些

VC6太老了
页: [1]
查看完整版本: string的几个函数,vb应该用得到