摘要: 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 美在天下 阅读(3240) 评论(0) 推荐(0) 编辑
摘要: Public Class Profile Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As Stri 阅读全文
posted @ 2016-11-23 14:09 美在天下 阅读(8443) 评论(0) 推荐(0) 编辑
摘要: Public Class Profile Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefaul... 阅读全文
posted @ 2016-11-23 14:05 美在天下 阅读(274) 评论(0) 推荐(0) 编辑