查看完整版本: 如何取得汉字的区位码

如何取得汉字的区位码

　　Dim f
Dim L1, R1 As Integer
Dim InputStr As String
InputStr = "汉"
f = Hex(Asc(InputStr))
L1 = CInt("