摘要: Public Function MD5(ByVal StrSource As String, ByVal Code As Integer) As String Dim str As String = "" Dim md5Hasher As New MD5CryptoServiceProvider() Dim data As Byte(... 阅读全文
posted @ 2016-11-23 14:14 美在天下 阅读(3260) 评论(0) 推荐(0)
摘要: Public Class Profile Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As Stri 阅读全文
posted @ 2016-11-23 14:09 美在天下 阅读(8494) 评论(0) 推荐(0)