[填空題] 在計算機中用一個字節(jié)(8位),來存儲一個字符的Ascii碼，其中低7位二進(jìn)制數(shù)對應(yīng)字符的編碼，每個字節(jié)的最高位一般保持為”0&a
[填空題] 在計算機中用一個字節(jié)(8位),來存儲一個字符的Ascii碼，其中低7位二進(jìn)制數(shù)對應(yīng)字符的編碼，每個字節(jié)的最高位一般保持為”0”,在數(shù)據(jù)傳輸時可用作奇偶校驗位，傳輸時Ascii代碼轉(zhuǎn)換成傳輸碼的方法是:若7位Ascii碼有偶數(shù)個1，最高位為1，有奇數(shù)個1，則最高位為0，例如字母”A”的Ascii碼十進(jìn)制表示為65,二進(jìn)制表示為00100001?！盇”的傳輸碼則為”1010 0001”,本程序的功能就是把Ascii碼轉(zhuǎn)換成這種傳輸碼Option ExplicitPrivate Sub Commandl_Click()Dim i As Integer，S As StringDim str As String，ch As Stringstr=Text1.textFor i=1 To Len(str)（）Call convert(ch，s)List1.AddItem ch & "==>" & SNext iEnd SubPrivate Sub convert(ch As String，S As String)Dim m As Integer,k As Integer,n As Integer,i As Integers= （）n=Asc(ch)Do While n>0（）S=m & SIf m=1 Thenk=k+1End Ifn=n2LoopFor i=1 To 7-Len(s) ’將字符的二進(jìn)制代碼補足7位S="0" & SNext iIf k Mod 2=0 Then（）ElseS="0" & SEnd IfEnd Sub
正確答案：ch=Mid(str，i，1)，" "，m=n Mod 2，s="1" & s
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。