Public Function ConvertStrArray2ByteArray(ByVal strData() As String) As Byte()
If (strData.Length > 0) Then
Dim result(strData.Length) As Byte
For i As Integer = 0 To strData.Length
result(i) = Convert.ToByte(strData(i), 16)
Next
Return result
Else
Return Nothing
End If
End Function
'OR
Public Function ConvertStrArray2ByteArrayWithLINQ(ByVal strData() As String) As Byte()
Dim result = From e In strData Select ex = Convert.ToByte(e, 16)
Return result.ToArray()
End Function