[填空題] 本程序的功能是將漢字的區(qū)位碼轉(zhuǎn)換成以十六進制數(shù)形式表示的機內(nèi)碼。漢字的區(qū)位碼由4位數(shù)字組成,前兩位數(shù)字表示漢字在編碼表中的區(qū)號,后兩位數(shù)字表示位號,
[填空題] 本程序的功能是將漢字的區(qū)位碼轉(zhuǎn)換成以十六進制數(shù)形式表示的機內(nèi)碼。漢字的區(qū)位碼由4位數(shù)字組成,前兩位數(shù)字表示漢字在編碼表中的區(qū)號,后兩位數(shù)字表示位號,區(qū)號和位號均為十進制數(shù)。例如漢字"中"的區(qū)位碼是5448,即"中"的區(qū)號是54,位號是48。將區(qū)號與位號分別加上160,再轉(zhuǎn)換成十六進制數(shù)形式,就是"中"的機內(nèi)碼。請完善本程序。Option ExplicitPrivate Sub CmdChange_Click()Dim qw As String,jn As Stringqw=Text1Text2=qw2jn(qw)End SubPrivate Function qw2jn(st As String) As StringDim n1 As Integer,n2 As Integern1=Val(Left(st,2))+160n2=（）qw2jn=d2h(n1) & d2h(n2)End FunctionPrivate Function d2h(d As Integer) As StringDim p As Integer,q As String*1Dop= （）If p>9 Thenq=Chr(55+p)Elseq=CStr(p)EndIf（）d=d16Loop Until （）End Function
正確答案：Val(Right(st,B))+AF0 或Val(Mid(st,C,B))+AF0；d Mod AF；dBh=q & dBh；d=0
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域?qū)I(yè)人士。