1. 调用子程序 [用区与位得到汉字]
2. msgbox HangZi
3. 脚本停止运行
4. 子程序 [用区与位得到汉字]
5.     //用区与位得到汉字 区16-87 位01-94
6.     i=16: aa = "": qu=87-16: wei=94-1
7.     循环 qu 遍
8.         j=1
9.         循环 wei 遍
10.             a = (i + 160) * &H100 + (j + 160): aa = aa & Chr(a): j=j+1
11.         循环结束
12.         i=i+1
13.     循环结束
14.     HangZi = aa
15. 子程序结束,回到调用处