What are the Ascii_7to8 and Decode7Bit functions
This article mainly explains "what are the functions of Ascii_7to8 and Decode7Bit". The content of the explanation is simple and clear, and it is easy to learn and understand. Please follow the editor's train of thought to study and learn "what are the functions of Ascii_7to8 and Decode7Bit".
Shared Function Decode7Bit (ByVal str7BitCode As String) As StringDim Inv7BitCode As String = InvertHexString (str7BitCode) Dim Binary As StringDim Result As StringDim i As IntegerFor i = 0 To Inv7BitCode.Length-1 Step 2Binary + = ByteToBinary (CByte (Val (& H) & Inv7BitCode.Substring (I, 2) NextDim Temp As IntegerFor i = 1 To Binary.Length 7Temp = BinaryToInt (Binary.Length-I * 7 7) If Temp = 0 Then Temp = 64Result = Result + ASCII_7to8 (Temp) 'OLD >' Result = Result + ChrW (Temp) NextReturn (Result) End Function#Region "ASCII_7to8" Shared ASCII_7to8 () As String = {_ "@", _ "£", _ "$", _ "¥", _ "è", _ "é", _ "cards", _ "letters", _ "", _ "vbLf", _ "", _ "ø" _ vbCr, _ "", _ "å", _ "Δ", _ "_", _ "Φ", _ "Γ", _ "A", _ "Ω", _ "Pi", _ "ψ", _ "Σ", _ "TA", _ "Chr", _ "1", _ "Qing", _ "æ", _ "²", _ "É", _ ", _"! ", _ Chr (34) _ "#", _ "Qing", _ "%", _ "&", _ "', _"', _ "(", _ ")", _ "*", _ "+", _ ",", _ "-", _ ".", _ "/", _ "0", _ "1", _ "2", _ "3", _ "4", _ "5", _ "6", _ "7", _ "8" _ "9", _ ":", _ " ", _", _ "?, _", _ "A", _ "B", _ "C", _ "D", _ "E", _ "F", _ "G", _ "H", _ "I", _ "J", _ "K", _ "L", _ "M", _ "N", _ "O", _ "P", _ "Q", _ "R" _ "S", _ "T", _ "U", _ "V", _ "W", _ "X", _ "Y", _ "Z", _ "Z", _ "woody", _ "", _ "Ü", _ "§", _ "?", _ "a", _ "b", _ "c", _ "d", _ "e", _ "f", _ "g", _ "h" _ "I", _ "j", _ "k", _ "l", _ "m", _ "n", _ "o", _ "p", _ "Q", _ "r", _ "s", _ "t", _ "u", _ "v", _ "w", _ "x", _ "y", _ "z", _ "ä", _ "ö", _ "ñ", _ "ü" _ "à" _} # End Region Thank you for reading The above is the content of "what are the Ascii_7to8 and Decode7Bit functions?" after the study of this article, I believe you have a deeper understanding of what the Ascii_7to8 and Decode7Bit functions have, and the specific use needs to be verified in practice. Here is, the editor will push for you more related knowledge points of the article, welcome to follow!