如何取得汉字的区位码
2006-02-27 11:41:55 来源:WEB开发网核心提示:DimfDimL1,R1AsIntegerDimInputStrAsStringInputStr="汉"f=Hex(Asc(InputStr))L1=CInt("&H" Mid(f,1,2))R1=CInt("&H" Mid(f,3,2))->
Dimf
DimL1,R1AsInteger
DimInputStrAsString
InputStr="汉"
f=Hex(Asc(InputStr))
L1=CInt("&H" Mid(f,1,2))
R1=CInt("&H" Mid(f,3,2))->
DimL1,R1AsInteger
DimInputStrAsString
InputStr="汉"
f=Hex(Asc(InputStr))
L1=CInt("&H" Mid(f,1,2))
R1=CInt("&H" Mid(f,3,2))->
更多精彩
赞助商链接