This function must be changed by a c# expert the converter does not work. It converts this function but the Conversion takes Len(text) into Strings.Len(text) in which string does not exists in the current context.
Function MakeByte(ByVal text As String) As Byte()
Dim i As Integer
Dim ba(text.Length - 1) As Byte
For i = 1 To Len(text)
ba(i - 1) = Asc(Mid(text, i, 1))