I had tried to search many forums to get this code.
Yes, just for a single line code. But when everything else failed, I decided to write my own. And it is really working good.
Expand|Select|Wrap|Line Numbers
- Private Function Byte2Str(ByVal gByte() As Byte) As String
- Dim X As Integer
- Dim gTmp As String = ""
- For X = 0 To gByte.Length - 1
- gTmp = gTmp & Chr(gByte(X))
- Next
- Return gTmp
- End Function
Shadab Ahmad