![](https://img-blog.csdnimg.cn/20201014180756922.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
vb
文章平均质量分 76
neil
old man
展开
-
05-25日<一个简单实用的 vb 加密/解密算法>之改进
在看了网友 everjoe评论后,俺改进了一下该程序,其实也就是把W系列的函数用B系列去替代,然后就支持中文加密了修改后的全部代码入下:Function UserCode(password As String) As String用户口令加密 Dim il_bit, il_x, il_y, il_z, il_len, i As Long Dim is_out As Strin原创 2001-06-06 00:09:00 · 2025 阅读 · 0 评论 -
一个简单实用的 vb 加密/解密算法
Function UserCode(password As String) As String用户口令加密 Dim il_bit, il_x, il_y, il_z, il_len, i As Long Dim is_out As String il_len = Len(password) il_x = 0 il_y = 0 is_out = "" Fo原创 2001-05-25 12:05:00 · 6046 阅读 · 0 评论