VB2008!!!从ACCESS数据库1的表1中提取数据(汉字或者数字)转换为字符串..(类似23d7y6fgds868gds98f8s43)我使用的代码        Dim sSourceData As String
        Dim tmpSource() As Byte
        Dim tmpHash() As Byte
        Dim a As String        Dim sqlstring As String = "select * from 过滤记录"        myconnection.Open()        mycommand = New OleDbCommand(sqlstring, myconnection)
        myreader = mycommand.ExecuteReader()        sSourceData = Me.mycommand.ToString  '输入(汉字)库
        tmpSource = ASCIIEncoding.ASCII.GetBytes(sSourceData)
        tmpHash = New MD5CryptoServiceProvider().ComputeHash(tmpSource)
        a = ByteArrayToString(tmpHash)  '输出(md5码)    Function ByteArrayToString(ByVal arrInput() As Byte) As String
        Dim i As Integer
        Dim sOutput As New StringBuilder(arrInput.Length)
        For i = 0 To arrInput.Length - 1
            sOutput.Append(arrInput(i).ToString("X2"))
        Next
        Return sOutput.ToString()
    End Function有更简单的么.谢谢