主题：[求助]使用 HMAC-SHA1 算法进行签名？

Dim text As String = "a=1252821871&b=tencentyun&k=AKIDgaoOYh2kOmJfWVdH4lpfxScG2zPLPGoK&e=1438669115&t=1436077115&r=11162&u=0&f="
Dim key = "nwOKDouy5JctNOlnere4gkVoOUz5EYAb"
Dim byteData = Encoding.ASCII.GetBytes(text)

Dim byteKey = Encoding.ASCII.GetBytes(key)
Dim hmac = new System.Security.Cryptography.HMACSHA1(byteKey)
Dim result = hmac.ComputeHash(byteData)

Dim ary(result.length+byteData.length-1) As Byte
result.CopyTo(ary,0)
byteData.CopyTo(ary, result.length)