|
发表于 2007-8-11 18:09:22
|
显示全部楼层
想知道任意字符所对应的Alt之后的数字吗?
1.复制以下代码到记事本,保存时选择文件类型为“所有文件(*.*)”,文件名:“任意文件名.vbs”- Do
- Text1 = InputBox("请把想输入的字符粘贴到此处:"+Chr(10)+"(一次只能输入一个字符,多输入的仅第一个字符有效,一个空格也计作一个字符)","用Alt+数字键输入任意字符")
- If Text1<>"" Then
- Text1 = Mid(Text1,1,1)
- num = Asc(Text1)
- If num < 0 Or num > 255 Then Text2 = num Xor &HFFFF0000 Else Text2= num End If
- MsgBox "按住Alt键不放,然后依次在小键盘上输入"+CStr(Text2)+","+Chr(10)+"再松开Alt键,即可以在任意位置输入字符“"+Text1+"”。"+Chr(10)+"(需要操作系统支持才能显示)",,"用Alt+数字键输入任意字符"
- End If
- Loop While MsgBox ("是否继续?"+Chr(10)+"选择“是”重新开始"+Chr(10)+"选择“否”退出程序"+Chr(10)+"[email]zhouyue18@yahoo.com.cn[/email]",vbYesNo,"谢谢使用") = vbYes
复制代码
2.双击该文件运行(某些杀毒软件会有警告),输入或者粘贴要输入的特殊字符(其实任意字符均可),然后就可以得到对应的数字
3.想要查找特殊字符的请打开开始菜单、所有程序、附件、系统工具、字符映射表,找到自己要的字符,按下方的“选择”按钮,再按“复制”按钮,然后粘贴到第二步的程序中即可 |
|