這篇文章主要講解了“Ascii_7to8和Decode7Bit函數(shù)有哪些”，文中的講解內(nèi)容簡(jiǎn)單清晰，易于學(xué)習(xí)與理解，下面請(qǐng)大家跟著小編的思路慢慢深入，一起來(lái)研究和學(xué)習(xí)“Ascii_7to8和Decode7Bit函數(shù)有哪些”吧！

專注于為中小企業(yè)提供成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作服務(wù),電腦端+手機(jī)端+微信端的三站合一,更高效的管理,為中小企業(yè)城口免費(fèi)做網(wǎng)站提供優(yōu)質(zhì)的服務(wù)。我們立足成都，凝聚了一批互聯(lián)網(wǎng)行業(yè)人才，有力地推動(dòng)了近1000家企業(yè)的穩(wěn)健成長(zhǎng)，幫助中小企業(yè)通過(guò)網(wǎng)站建設(shè)實(shí)現(xiàn)規(guī)模擴(kuò)充和轉(zhuǎn)變。

Shared Function Decode7Bit(ByVal str7BitCode As String) As String
Dim Inv7BitCode As String = InvertHexString(str7BitCode)
Dim Binary As String
Dim Result As String
Dim i As Integer
For i = 0 To Inv7BitCode.Length - 1 Step 2
Binary += ByteToBinary(CByte(Val("&H" & Inv7BitCode.Substring(i, 2))))
Next
Dim Temp As Integer
For i = 1 To Binary.Length  7
Temp = BinaryToInt(Binary.Substring(Binary.Length - i * 7, 7))
If Temp = 0 Then Temp = 64
Result = Result + ASCII_7to8(Temp) 'OLD >>>> 'Result = Result + ChrW(Temp)
Next
Return (Result)
End Function

#Region " ASCII_7to8 "
Shared ASCII_7to8() As String = { _
"@", _
"￡", _
"$", _
"￥", _
"è", _
"é", _
"ù", _
"ì", _
"ò", _
"?", _
vbLf, _
"?", _
"?", _
vbCr, _
"?", _
"?", _
"Δ", _
"_", _
"Φ", _
"Γ", _
"Λ", _
"Ω", _
"Π", _
"Ψ", _
"Σ", _
"Θ", _
"Ξ", _
"1", _
"?", _
"?", _
"?", _
"é", _
" ", _
"!", _
Chr(34), _
"#", _
"¤", _
"%", _
"&", _
"'", _
"(", _
")", _
"*", _
"+", _
",", _
"-", _
".", _
"/", _
"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", _
"?", _
"?", _
"?", _
"ü", _
"§", _
"?", _
"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

感謝各位的閱讀，以上就是“Ascii_7to8和Decode7Bit函數(shù)有哪些”的內(nèi)容了，經(jīng)過(guò)本文的學(xué)習(xí)后，相信大家對(duì)Ascii_7to8和Decode7Bit函數(shù)有哪些這一問(wèn)題有了更深刻的體會(huì)，具體使用情況還需要大家實(shí)踐驗(yàn)證。這里是創(chuàng)新互聯(lián)，小編將為大家推送更多相關(guān)知識(shí)點(diǎn)的文章，歡迎關(guān)注！

新聞標(biāo)題：Ascii_7to8和Decode7Bit函數(shù)有哪些
轉(zhuǎn)載注明：http://jinyejixie.com/article20/pgioco.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供動(dòng)態(tài)網(wǎng)站、網(wǎng)站改版、Google、域名注冊(cè)、響應(yīng)式網(wǎng)站、

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)